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1.0 Perspective 



1.1 INTRODUCTION 

The Osborne 1 computer is a completely integrated computer unit. Designed 
to be portable, the entire computer weighs 24 pounds including a weather- 
resistant case and handle which facilitate moving it from one location to 
another. 

The primary hardware components of the Osborne 1 are: 

1. Dual 5 1/4-inch disk drives 

2. Built-in 5" black and white monitor 

3. Single-board computer 

4. Z80A central processor 

5. 64K bytes 

6. 4K bytes ROM 

7. Floppy disk interface 

8. IEEE-488 interface 

9. RS-232C interface 

10. Modem (communications) interface option 

11. 32 X 128 character memory-mapped video 

12. Battery-pack option 

13. 69-key detachable keyboard /numeric keypad 

14. Lightweight, switching power supply 

The design philosophy used in creating the Osborne 1 was twofold: 1) get all 
of the user controls and interface options up front where the user can see and 
manipulate them; and 2) make sure all of the components are integrated in 
such a way so that the case becomes a protective shell when the unit is closed 
up for traveling. 

Upon receiving an Osborne 1, the user merely lays the unit on a flat surface, 
plugs it in, unlocks two latches to pull the keyboard unit from the rest of the 
computer, then begins using the computer. In normal operation, the main 
computer housing is propped onto the back lip of the keyboard, so the video 
display is tilted at a comfortable working angle. 
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1.2 POWER ON 

When the Osborne 1 is powered ON, a sign-on message is displayed on the 
video monitor prompting the user to insert a diskette and press the RETURN 
key. This same message is displayed immediately following the depression of 
the RESET button located on the front panel of the Osborne 1. 

The current revision of the monitor ROM is identified within the box under 
"OSBORNE 1" in the sign on message. There have been a number of hard- 
ware and software modifications during the ongoing refinement of the com- 
puter. Improvements have been made and features have been added in four 
distinct catagories; the main logic board, the disk interface board, the monitor 
ROM, and BIOS. Also, the latest Osborne 1 has a blue injection-molded case 
with a covered vent and fixed lid that covers the power well. 

1.3 VARIATIONS IN DESIGN 

Since there are some subtle differences between the various releases of the 
Osborne 1, this manual attempts to point out discrepancies between these 
versions whenever possible. For instance, as of this writing, there are current- 
ly six revisions of the main assembly logic board (A-F) which is further 
complicated by eight revisions of the board with components (A-H). There 
have also been numerous revisions of the disk interface board, four revisions 
of the monitor ROM (A, 1.2, 1.3, 1.4), and five revisions of BIOS (A, 1.2, 1.2.1, 
1.3, 1.4). Version A software (ROM and BIOS) were upgraded to 1.2 free of 
charge by Osborne Computer Corp in November of 81. 

The ROM monitor, which takes control of the machine at power on and reset 
(and displays the "Insert Disk" message described earlier), contains the disk- 
ette boot loader and extensions to the CP/M BIOS routines. There are no 
machine-level byte entry, examination, or modification routines in the ROM 
monitor. Such routines are unnecessary, given the utility software supplied 
with the Osborne 1. 

Single density versions of the Osborne 1 prior to the 1.3 ROM and BIOS 
include a set of built-in diagnostics which are accessible by pressing "D when 
the sign-on message is displayed. 

Further discussion of the main hardware and software will be found in the 
following detailed descriptions of each module. 
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2.0 Logic Board And CPU 



2.1 OSBORNE 1 MAIN LOGIC BOARD 

The main logic board— as already described— contains all of the electronics 
necessary to provide a 64K, Z80A-based computer, including the additional 
interfaces required to run the disk drives, video display, and external commu- 
nications ports. 

2.2 BOARD REVISIONS 

Six revisions of the bare main logic board have been made: 

Revision A — prototype, not released 

Revision B — first release, requires wiring changes 

Revision C — incorporates all wiring changes, requires additional 

changes to correct layout problems 

Revision D — requires no wiring changes 

Revision E — complete relayout of board 

Revision F — revision E board with clock modification added 

Boards at levels B through F are in the field. Current production (15 June 1982) 
is at the Revision F level. 

Boards loaded with parts are given a separate revision level: 

Revision A — prototype, not released 

Revision B — memory 

Revision C — first revision shipped. Revision B bare board 

Revision D — incorporates rework required by Revision C bare board 

Revision E — same as Revision D loaded board, but assembled with- 
out rework 

Revision F — first incorporation of Revision E bare board, not 
released 

Revision G — primary production board through 3 November 1981, 
incorporates Revision E bare board 

Revision H-N — released 



NOTE 

As of 9/82 a multilayer main logic PC Board which conforms to F.C.C. 
regulations is in production. 
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Beginning in January 1982, an international version of the Osborne 1 was in 
production. The difference in this international version is the character gen- 
erator ROM and the primary power supply which is configured to accomo- 
date the international voltages being used. 

Also, future Osborne I's which have been upgraded to double density, feature 
a 1.4 ROM. The double density option includes a small add-on component 
board mounted above the main logic board. This option will be described 
more thoroughly, later in this manual. 

2.3 BOARD LAYOUT 

The layout for the current revision and future multilayer main logic board are 
both shown in Figure 2.3: 

2.4 CENTRAL PROCESSOR 

The central processor used is the NEC C780C, which is equivalent to the Zilog 
Z80A. 

The CPU uses a clock of 4-megahertz, generated from a 15.9744-megahertz 
crystal run through a 74LS161 binary counter. 
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3.0 Osborne 1 Memory 
Scheme 

3.1 MEMORY BANKS 

Four rows of eight 4116 dynamic RAM chips provide the Osborne 1 with 64K 
of main memory. The meiriory on the Osborne 1 main logic board is mapped 
into three logical banks. The first bank of memory is 64K by 8 bits of dynamic 
RAM (4116 chips). The second bank of memory consists of 4K of ROM 
(currently a 2732 chip; formerly two 2716 chips), 16K of RAM, and memory- 
mapped I/O . A "mimicking" of the first bank's dynamic RAM provides the 
top 48K. The third bank of memory is 16K by 1 bit worth of dynamic RAM 
memory used for storing the dim character video attribute. Figure 3.1 below 
shows the Osborne 1 memory map: 

The addresses shown on this memory map pertain to the 1.4 ROM and BIOS. 
Software released prior to 1.4 has different addresses for BIOS, BDOS, and 
CCR Consult the Software section for more information. 

3.2 CP / M MEMORY ALLOCATION 

0000 - 0002 Jump to BIOS warm start entry 

0003 lOBYTE 

0004 Drive number /current user 

0005 - 0007 Jump to BDOS entry 
0008 - 0037 Reserved for interrupts 
0038 - 003A RST7 (used by DDT) 
003B - 003F Reserved for interrupts 
0040 - 004F Scratch area used by BIOS 
0050 - 005B Not used 

005C - 007C File control block 

007D - 007F Random record position 

0080 - OOFF Default DMA buffer area 

0100 - CEFF Transient program area 

CBOO - EOFF CCP/BDOS (CP/M) 

ElOO - EFFF BIOS and Osborne buffer area 

FOOO - FFFF Memory mapped video display 

Note: 1.2 and 1.3 software have CCP/BDOS located from CFOO to E4FF and 
BIOS from E500 to EFFF. 
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Figure 3.1 Osborne 1 Memory Map 
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3.3 MAIN MEMORY 

Bank 1 of memory is used mainly for programming. CP/M, for instance, loads 
itself into the uppermost free area — just below the video display memory — 
with the Basic Input Output System (BIOS), the Basic Disk Operating System 
(BDOS) and the Console Command Processor (CCP). As with all CP/M 
systems, the memory area from 0000 hex to 0100 — commonly referred to as 
"page 1" of memory — is reserved for use by CP/M. Overall, about 51K bytes 
of usable memory are available to the programmer. 

As you can see from Figure 3.1, the primary bank of memory is divided into 
60K of user memory and 4K of video display memory. The video display 
memory layout is discussed in an upcoming section. 

3.4 MEMORY-MAPPED I/O 

The second bank of memory consists of the monitor ROM and memory- 
mapped I/O. Specifically, the serial/modem port, IEEE-488 port, disk inter- 
face, and keyboard are all addressed through the memory-mapped I/O 
section. The memory-mapped I/O is detailed in Figure 3.4 and 3.4.1. 

Use of each of the I/O memory locations will be discussed in conjunction 
with the specific peripheral being addressed. 

3.5 MEMORY ACCESS TIME 

The memory access time is 250 nanoseconds for programmable memory and 
350 nanoseconds for the read-only memory. Programs in read-only memory 
execute without delay, while programmable memory has delay times added 
as follows: 

First Ml cycle — 188 nanoseconds 

Subsequent consecutive Ml cycles — nanoseconds 

Non-Ml cycles — 375 nanoseconds 
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Figure 3.4 I/O memory map 
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OSBORNE 1 9/0 Port Assignment (Shadow Mode) 





Address 


Read 


Write 


CO 

5 


2100 
2101 
2102 
2103 


Status Register 
Tracic Register 
Sector Register 
Data Register 


Controi Register 
Tracic Register 
Sector Register 
Data Register 


■a 

1- 

(0 

o 

n 

1 


2201 
2202 
2204 
2208 
2210 
2220 
2240 
2280 


Row 
Row 1 
Row 2 
Row 3 
Row 4 
Row 5 
Row 6 
Row 7 




< 

Q. 

OO 
CO 


2900 
2901 
2902 
2903 


Port A Direction/Data 
Port B Direction/Data 


Port A Direction/Data 
Port A Controi Register 
Port B Direction/Data 
Port B Control Register 


CO 


2A00 
2A01 


Status Register 
Receive Buffer 


Control Register 
Transmit Buffer 


< 

Q. 

O 
<D 
T3 

> 


2C00 
2C01 
2C02 
2C03 


Port A Direction/Data 
Port B Direction/Data 


Port A Direction/Data 
Port A Control Register 
Port B Direction/Data 
Port B Control 



Figure 3.4.1 I/O Port Assignments In Bank 2 
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4.0 Osborne 1 Interface 
Design 



4.1 IEEE-488 INTERFACE 

The IEEE-488 interface is created using a 6821 PIA. The IEEE-488 implementa- 
tion, as described in the Osborne 1 User Guide's Appendix, is a subset of the 
complete IEEE specification. Specifically, no provision has been made for 
controlling multiple devices on the interface. 



4.1.1 IEEE-488 Signal Direction 

The Osborne 1 IEEE-488 signal directions are provided here: 

Osborne 1 IEEE Device 



REN 

IFC 

ATN 

SRQ 

NRFD 

DAV 

EOl 

NDAC 

GND 
DATAO 
DATA1 
DATA2 
DATA3 
DATA4 
DATA5 
DATA6 
DATA7 



-> 



<- 
<- 



<- 
<- 
<- 
<- 
<- 
<- 
<- 
<- 



-> 
-> 
-> 
-> 
-> 
-> 
-> 
-> 



Figure 4.1.1 IEEE-488 Signal Direction 
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4.1.2 IEEE-488 Pinouts 



Any IEEE 488-compatible device can connect to the Osborne 1 through the 
IEEE connector. Because this port is used for more than just IEEE 488 signals, 
we've declined to use a standard IEEE connector. The following table shows 
the pin assignments for both the IEEE standard connector and the Osborne 1 
edge connector: 



IEEE 


OSBORNE 


SIGNAL NAME 


1 


1 


Data bit 1 


(DIOl) 


2 


3 


Data bit 2 


(DI02) 


3 


5 


Data bit 3 


{DI03) 


4 


7 


Data bit 4 


(DI04) 


5 


9 


End or Identify 


(EOI) 


6 


11 


Data valid 


(DAV) 


7 


13 


Not ready for data 


(NRFD) 


8 


15 


No data accepted 


(NDAC) 


9 


17 


Interface clear 


(IFC) 


10 


19 


Service request 


(SRQ) 


11 


21 


Attention 


(ATN) 


12 


23 


Cable shield + GND 


(SHIELD) 


13 


2 


Data bit 5 


(DI05) 


14 


4 


Data bit 6 


(DI06) 


15 


6 


Data bit 7 


(DI07) 


16 


8 


Data bit 8 


(DI08) 


17 


10 


Remote enable 


(REN) 


18 


12 


Signal ground 


(DAV) 


19 


14 


Signal ground 


(NRFD) 


20 


16 


Signal ground 


(NDAC) 


21 


18 


Signal ground 


(IFC) 


22 


20 


Signal ground 


(SRQ) 


23 


22 


Signal ground 


(ATN) 


24 


24 


Signal ground 


(Logic) 



The pinouts for the signals described above are as follows: 
S=z=av 2623211917151311 9 7 5 3 1 a==J 

jiwMhmi 

252422201816141210 8 6 4 2 
26-pin edge connector, looking at front of Osborne 1. Pins 25 and 26 are not 
used, but provided for compatability. 

Figure 4.1.2 IEEE-488 Pinouts 
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4.1.3 IEEE-488 Jump Vectors 

To provide easier access to the routines necessary to use the IEEE-488 inter- 
face, the CP/M BIOS jump table has been extended to provide a series of extra 
jumps specifically for the IEEE-488 programmer. The IEEE-488 routines are 
offset from the starting address of BIOS as follows: 

BIOS + 3FH Control out 

BIOS + 42H Status in 

BIOS + 45H Go to standby 

BIOS + 48H Take control 

BIOS + 4BH Output interface message 

BIOS + 4EH Output device message 

BIOS + 51H Input device message 

BIOS + 54H Input parallel poll message 

4.1.4 IEEE-488 Communication Protocol 



IEEE-488 commands use no RAM other than the stack. Each command rou- 
tine in BIOS determines status of the port by reading the status of the 6821 
PIA chip. The PIA transmits signals in both directions, so to reduce the 
overhead in determining the current direction the PIA is attempting to 
communicate, it is always left in one of two modes: 



the source handshake mode 

or 
the acceptor handshake mode 



(The PIA specification sheet will be help- 
ful in determining these modes.) 



Several of the IEEE commands require that the PIA be in the source hand- 
shake mode when called. The PIA is normally in the source handshake mode 
following the completion of any IEEE- bus information transfer, so this is not 
a major restriction. For instance, both the Status In and the Parallel Poll 
commands require that the PIA be in the source mode, which means that you 
can perform the detection-of-device request using either serial poll or parallel 
poll only when the interface is idle. 

To send data to a device on the IEEE bus, the controller makes the device a 
LISTENER, assumes the role of TALKER, and sends the data. To receive data 
from an external device, the controller must first make the device a TALKER 
and then assume the role of LISTENER. After this, the controller goes on 
"standby" and allows the two devices to communicate at their own rate. 

The controller can regain control asynchronously by setting the ATN signal 
to true. But if a device-dependent message is true at the same time when ATN 
becomes true, other devices on the IEEE bus can misinterpret the interrupted 
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byte as an interface message and produce chaos. Avoid the problem by taking 
control synchronously. If high-speed transfer of data between devices is not 
required and the computer can be tied up during the transfer, it is better to 
make the controller listen to the transfer while discarding the data. This 
procedure allows the controller to count transfers, look for EOI signals, or 
"time out" the TALKER before regaining control. 

The IEEE commands are detailed in the User's Guide's Appendix, w;ith sam- 
ple programs included to help decipher how we've put the BIOS jumps into 
effect for the IEEE bus. A listing of the 6821 registers and instruction set is 
provided as Appendix B of this manual for those who wish to make direct use 
of the PIA for controlling the IEEE-488 port. 

4.1.5 IEEE-488 As A Parallel Port 



The IEEE-488 can also be used as a standard parallel port, and software has 
been added to the BIOS section of CP/M so that users of a Centronics- 
compatible printer may use their printer as the list device under CP/M. By 
setting the CP/M lOBYTE equal to BAT:, URl:, UPl:, or LPT:, the IEEE-488 
port is reconfigured by BIOS to be a simple 8-bit parallel input /output port 
with the following pinouts: 



Osborne 




Centronics- 


IEEE Edge 




Compatible 


Connector 




Connector 


pin 1 


data 


2 


2 


data 4 


6 


3 


data 1 


3 


4 


data 5 


7 


5 


data 2 


4 


6 


data 6 


8 


7 


data 3 


5 


8 


data 7 


9 


11 


out strobe 


1 


12 


ground 


19 


15 


busy 


11 


16 


ground 


29 


19 


select 


13 



Figure 4.1.5 IEEE-488 Parallel Interface 
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To use a parallel printer connected to the IEEE interface, you must employ the 
SETUP program to configure the appropriate protocol for the printer. You 
need do this only once for each diskette. Alternatively, if you have tv^^o 
printers hooked up, or wish to change the printer being used from within a 
program, you can reset the lOBYTE as described later. 



4.2 SERIAL RS232 INTERFACE 

The serial port is configured as a RS-232C-compatible port, though certain of 
the RS-232C signals are held at +5 volts since they are not needed to control 
the Osborne 1. A 6850 ACIA chip controls the serial port. 

The RS232 status port address is located at 2A00H and the data port at 2A01H 
in the shadow mode. RS232 status bit assignments are detailed in the follow- 
ing diagram: 



6 5 4 3 2 10-*- 



R R T R 



-Bit No. 
■Status register 



iiiiAAii 



-RDRF, Receive Data register is full 
■TORE, Transmit Data register is empty 



■DCD, Data Carrier Detect signal status 
■CTS, Clear To Send signal status 

FE, Framing Error 

OVRN, Receive overrun error 

PE, Parity Error 
• IRQ, Interrupt request 



NOTE: See pages 9-59 and 9-60 in Volume 2 of An Introduction To Micro 
computers by Adam Osborne /McGraw-Hill or the 6850 Data sheet for a 
complete description. 

Figure 4.2 RS-232 Status Bit Assignments 
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4.2.1 RS232 Signal Direction 



The serial port is configured as a DTE device. The following signals apply: 



Osborne 1 



RS-232 device 



GND 

TXDATA 

RXDATA 

RTS 

CIS 

DSR 

CARR DEI 

DTR 



< 



+ 5 volts- 

+ 5 volts- 

+ 5 volts- 

K 



■ > 

■ > 



■> 



ND 

TXDATA 

RXDATA 

RTS 

CTS 

DSR 

CARR DET 

DTR 



Figure 4.2.1 RS-232 Signal Direction 
4.2.2 RS232 Pinouts 

Below are the pin assignments for the RS-232 serial interface: 
DB-25S RS-232 Pin Definition 



Frame ground (optional) 

Transmitted data (low=l) 

Received data (low=l) 

Request to send (high or no connection enables) 

Clear to send (always high on OCC 1) 

Data set ready (always high on OCC 1) 

Signal ground 

Received line signal detected (always high) 

Data terminal ready (high or no connection enables) 



1 


AA 


2 


BA 


3 


BB 


4 


CA 


5 


CB 


6 


CC 


7 


AB 


8 


CF 


20 


CD 



13 12 11 10 9 8 7 6 5 



3 2 



ooooooooooooo 
oooooooooooo 
25 24 23 22 21 20 19 18 17 16 15 14 



9,10,11,12,13,14,15,16,17,18,19,21,22,23,24,25 no connections 
Figure 4.2.2 RS-232 Serial Pinouts 
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4.3 MODEM 

A close look at the circuitry iri the Osborne 1 schematics will show that the 
modem and RS-232 interfaces are basically one and the same. In addition to 
the serial port, TTL-level signals may be directly input into the 6850 ACIA 
using the modem port connection. To read to and from the modem or serial 
port use the CP/M lOBYTE function. 



4.3.1 Modem Signal Direction 



The following signals apply to the Modem Port: 
Osborne 1 



Modem Device 



GND 

TXDATA 

RXDATA 

MSB 

CTS 

MCB 

+ 12 

Rl 



> 



<- 
<- 
<- 



< 



GND 

TXDATA 

RXDATA 

MSB 

CTS 

MCB 

POWER IN 

CD 



4.3.2 



Figure 4.3.1 Modem Signal Direction 
Modem Pin Connections 



The pin connections on the modem port are as follows (all use the standard 
numbering of the DE-9P connector). 



DE-9P Osborne Modem Definition: 

1 GND — Signal ground 

2 TXD — Transmitted data — TTL logic, l=high 

3 — Not used 

4 MSB — Modem status bit — open collector, 50ua sink = inactive 

5 CTS - Clear to send 

6 RXD — Receive data — bipolar input, -0.5v-10v=l 

7 +12v — Connected to power supply through 22 ohms 

8 MCB — Modem control bit — TTL, low suppresses output 

9 RI — Ring indicator — TTL, high-to-low sets flag 
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Figure 4.3.2 Modem Pinouts 



NOTE: all signals are TTL-level and thus this interface is extremely vulner- 
able to damage through misuse. 

Early versions of the main PC board have a reversal of the modem signals 
described in this document; the original design called for a female modem 
socket. Consult the User's Guide which accompanied your Osborne 1 for the 
applicable modem pinouts. A special cable is required with the Osborne 
Modem to compensate for the configuration of these earlier connectors. 

If you have a modem that uses an RS-232C connector, you may have to use an 
external adapter box to properly institute all the modem functions. Connect- 
ing a modem without using an external adaptor may damage your Osborne 1, 
as pins 4 and 5 are open collectors and are sensitive to signal-edge transitions. 
If pin 4 is not connected to the modem, make sure that nothing is connected to 
pin 4 at the Osborne end; otherwise, adjacent signals may be received inad- 
vertently. 

4.3,3 Modem Status 



You can determine the output status of the modem port by using the BIOS call 
LISTST located at 0E12D hex. A value of OFF hex indicates that the list device is 
ready; 00 indicates busy. 

To find the input status of the modem port, you must first switch to bank 2 of 
memory and then look at memory location 2A00 hex. To change the status of 
the modem or serial device directly, you use the same memory location and 
write a special "control" byte as dictated in the 6850 specification sheet. 
Memory location 2A01 hex in bank 2 is the data buffer: you read information 
from external devices by moving the byte to one of the CPU internal registers, 
you send information to the external device by moving data from the CPU 
register to the memory location. 
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4.4 BAUD RATE 

Baud rates for the serial and modem ports is software-selectable between 300 
or 1200 (use the SETUP program to change the baud rate from 1200 that BIOS 
assumes to 300). If necessary, the baud rate may be increased (on Revision 
level E boards and latter) from the 300/1200 baud normally used on the 
Osborne 1 to 600/2400 baud. To Switch baud rates remove the two-pin jumper 
from the position "]1" (See Fig. 2.3) on the logic board. Earlier versions 
require soldering and cutting of traces. 

An even faster Baud rate of 1200/2400 or 2400/9600 can be attained with the 
addition of a few routing wires. The Osborne 1 cannot handle terminal 
functions above 2400 baud due to the limitation of system calls. However, 
communication to an external terminal, printer or another computer can be 
maintained at these higher rates of transmittion. 

Note: We are making the procedure for increasing Baud rate available because 
we are convinced that certain parties are using it successfuly. Osborne Com- 
puter Corporation does not officially support these higher Baud rates because 
the 6850 support driver is potentially unreliable at high speeds. Also, be 
forwarned that any tampering within the computer will void your waranty. 

Here is the procedure for increasing the Baud rate to either 1200/2400 or 
2400/9600. Refer to the Figure 2.3 of the main logic board and the illustration 
below the instructions for more details: 

1. Remove LS161/163 from C3 and repace it with a 16 pin socket. 

2. Bend up pins 2, 3, 7, and 10. 

3. Route a wire between pins 3 and 4, another between pins 4 and 7, and 
another wire between pins 7 and 10. 

4. Place the modified pack in the socket. The modification so far will 
provide 1200/4800 Baud capability 

5. For 2400/9600 Baud you must connect an extra wire from pin 2 to the 
middle contact of J2 as illustrated in Figure 4.4. 

For those who wish to control the 6850 ACIA directly. Appendix C contains a 
listing of the registers and instructions the 6850 chip utilizes. 
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FOR 9600/2400 BAUD ^-•C 



>-«: 



J2 







LSiei/ 

LS163 



C3 



16 



15 



14 



12 



10 



3 
3 



300/1200 NO MOD - J1 IN 




600/2400 NO MOD - J1 OUT 




1200/4800 MOD W/O PIN 2 (J1 


= X) 


2400/9600 MOW W/PIN 2 (J1 = 


X) 



SPEED SELECTED W/IN 6850 





o 






1793 
B7 

















) 






J3 






























2 j FOR 4800/1200 BAUD 



D 
D 



DON'T CARE 



Figure 4.4 Baud Rate Hardware Modification 
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5.0 Video Attributes 



5.1 VIDEO DISPLAY 

The video display probably has the trickiest design of any of the modules on 
the main logic board. A 6821 PIA chip is used to control portions of the video 
display circuitry, while the video display circuitry itself is used to refresh the 
main memory dynamic RAM. A 2716 ROM is used as a character generator, 
and an extra 4116 chip is used to store the dim video attribute. 

5.2 VIDEO MEMORY 

Memory from OFOOO hex to OFFFF hex is used for the video memory map. That 
memory is considered to be 32 rows of 128 characters, even though only 24 
rows of 52 characters are actually displayed on the monitor screen at a time. 
The character matrix is 7 X 9 in an 8 X 10 box. The following bits are used to 
encode the character to be displayed: 



bit number 



. ASCII character 
.underline attribute 
.dim attribute 
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5.3 CHARACTER GENERATION 

All characters are defined using a dot matrix that is 8 columns wide by 10 
rows high. Within the character generator ROM, 128 characters are defined. 
The top row of each character is defined in the first 128 bytes of the character 
generator ROM. The second row is subsequently defined in the second 128 
bytes, and so on. This is illustrated as follows: 



Character represented! ° ° _ 
by this ASCII code i o o = 

/cO CO o 



CM 

o 



O 1- 






O O O 
(O CO CO 

< < < 



Q tU U. 

1^ 1^ r^- 

O O O 

CO CO CO 

< < < 



Row 1 
Row 2 
Row 3 
Row 4 
Row 5 
Row 6 
Row 7 
Row 8 
Row 9 
Row 10 



0000- 
0080- 
0100- 
0180- 
0200- 
0280- 
0300- 
0380- 
0400- 
0480- 



Row memory 
addresses 



ASCII 4/16 = "A" 

"A" is encoded in 
eight bytes as 
follows: 1. 



■007F 
























OOFF 
























017F 
























01FF 
























027F 
























02 FF 
























037F 
























03FF 
























047F 
























04FF 



























































1 


1 



















1 


1 

























































1 


1 
















1 


1 










































































Byte 
Address 
0041 

00C1 

0041 

01C1 

0241 

0241 

0341 

03C1 

0441 

04C1 



Figure 5.3 Character Generator Encoding 
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5.4 DISPLAY LOGIC 

In order to create displays, ASCII codes are written into screen RAM. Display 
logic fetches the code in each screen RAM location and displays the character 
from the character generator ROM corresponding to the screen RAM ASCII 
code. This may be illustrated as follows: 



CHARACTER GENERATOR ROM 




THREE CHARACTERS IN 
CHARACTER GENERATOR 
ROM 



DISPLAY 



i i i 















THREE ASCII CODE ADDRESSES 



THREE DISPLAYED CHARACTERS 
PROVIDED BY THE CHARACTER 
GENERATOR ROM 



Figure 5.4 Display Logic Diagram 



5.5 BLOCK GRAPHICS 

The first 32 character values (00 hex through IF hex) are not displayable 
ASCII characters and are thus used for block graphics characters on the 
Osborne 1. The following graphic characters are available: 
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Hexa 




















Decimal 






Binary 








ASCII 


























■ 


@ 


1 






















1 

■ 


"A 


2 





















■ 
■ 




3 

























4 














1 







1 


"D 


5 














1 







■ 


''E 


6 














1 






T 


'^F 


7 














1 






r 


'^G 


8 





















^ 


"H 


9 





















r 


" 1 


A 




















V 


"J 


B 




















!! 


f^ 1 


C 













1 






■ ■ 


L 


D 













1 






u 


"M 


E 













1 






■ 
■ 


"N 


F 













1 






■ ■ 


''O 


1 




















n 


Ap 


1 1 




















■ 


'^Q 


1 2 




















J 


"R 


1 3 




















iZQ 


"S 


1 4 













1 






k 


"T 


1 5 













1 






Ik 


"U 


1 6 













1 








-^v 


1 7 













1 






^1 


''w 


1 8 



















^ 


^X 


1 9 



















A 


-Y 


1 A 



















■ 


"^T 


1 B 



















™" 


ESC 


1 C 












1 






c 


— 


1 D 












1 






p^ 


1 


1 E 












1 










1 F 












1 






J 


'■ 



NOTE 

Graphic characters must be accessed through an application program. ESC g 
enters graphic mode. The hex equivalent of each graphic character accesses 
and displays the graphic character. 



Figure 5.5 Graphic Character Chart 
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5.6 VIDEO SIGNALS AND PINOUTS 

The video signals are either directed to the built in monitor, or to an external 
monitor depending on what's plugged into the PC edge connector on the 
front panel of the Osborne 1. Normally, a shunt plug connects here which 
directs the video signals from the bottom of the PC board to the monitor 
connections on the top edge of the PC board. The following PC board pinouts 
apply: 



=\ 1917151311 9 7 5 3 1 s= 

luMiiiur 

201816141210 8 6 4 2 

pin 2 Ground 

4 Brightness high 

6 Brightness low Brightness potentiometer 

8 Brightness arm 

10 Ground 

12 Horizontal sync 

14 +12 volts 

16 Video out 

18 Vertical sync 

20 Ground 

Figure 5.6 PC Edge Video Pinouts 
5.6.1 Video In-line Connector 

Normally, the shunt connects each of the above signals to the top side of the 
PC board, meaning that pin 2 connects to pin 1, pin 4 to pin 3, etc. In addition, 
a single inline connector located inside the Osborne 1 on the main logic board 
becomes active when the shunt is in place. This single in-line connector 
provides the signals and power to the internal video display monitor. The 
pinouts for this internal connector are as follows: 



pin 



1 


Ground 


2 
3 
4 

5 


Brightness high 
Brightness low Brig 
Brightness arm 
Ground 


6 

7 


Horizontal sync 

+ 12 volts 8 video out 


9 
10 


Vertical sync 
Ground 



Brightness Potentiometer 



Figure 5.6.1 Video in-line Pinouts 
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5.7 VIDEO CONNECTIONS AND 
CIRCUITRY 

Figure 5.7A shows the connections between the top and bottom of the PC 
connector (P9) and the single In-line internal connector (P5): 



TO VIDEO DRIVE 
CIRCUITRY 



PC EDGE 



(P5) 



BOTTOM TOP 



SINGLE 
INLINE 



TO 5" MONITOR 



{P9) 





4 




3 




2 
















8 


7 


4 
















6 


5 


3 
















12 


11 


6 
















18 


17 


9 
















14 


13 


7 




c 




16 


16 


8 








20 


19 


10 










2 


1 


1 


















10 


9 


5 









BRIGHTNESS HIGH 



BRIGHTNESS ARM 



BRIGHTNESS LOW 



HORIZ. SYNC, 



Figure 5.7A PC edge to Single Inline connections 
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The following diagram illustrates the applicable circuitry connected to this 
single inline connector: 



+ 5V 



LOW INTEN. 



c^ 



cr- 



£> 



o^ 



+ 5V 



-wv- 

47 



1000 



+ 5V 



^ 1000 



1000 



ov ' ' 



ov. 



+ 12VDC ■ 



100K 
BRIGHTNESS 



CW 

n 



500 
CONTRAST 



HORIZONTAL 



HORIZONTAL GROUND 



POWER 



VIDEO GROUND 



GND 



BRIGHTNESS HIGH 



BRIGHTNESS ARM 



BRIGHTNESS LOW 



Figure 5.7B Video Drive Circuitry 
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5.8 VIDEO TIMING 



The following illustrations show the horizontal (5.8A) and vertical (5.8B) 
timing used in the video display interface: 



- START RETRACE 



- 0.12S ySeC MIN, DOT DURATION 



- WHITE 

- GREY 

- BLACK 



Figure 5.8A Horizontal Timing Diagram 





-* 


— START RETRACE 


260 SCAN LINES 










,* 1.28 MSEC 












































VIDEO 





240 SCAN LINES NON-INTERLACED 



Figure 5.8B Verticle Timing Diagram 

Warning: The video connectors contain TTL-level signals along with +12 
Volts, and are quite vulnerable to damage by accidental misconnections. Be 
careful when you attach anything to either video connector. 

The internal monitor is a P4 phosphorous monitor with an image area of 3.55 
inches horizontally and 2.63 inches vertically. Rated linearity is 10% for 
adjacent characters, 15% overall. 
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6.0 Power Specifications 



6.1 POWER SUPPLY 

The power supply for the Osborne 1 is an Astec switching power supply 
providing the following voltages and amperages: 

+5 volts 2.5 amps 
+ 12 volts 2.05 amps 

Earlier versions of the power supply may be wired for 115v or 230v operation. 
To switch from one voltage to another, the wire with the bright orange tag 
indicating the current voltage setting must be removed from the pin it is 
currently connected to and attached to the adjoining pin. (See Figure 6.3) 

6.2 SWITCHING VOLTAGE 

Osborne 1 computers with the new blue case can operate at the llOV and 
220V. Adapting the system for one of these voltages requires rotation of a fuse 
card accessable through the rear power well. The circuit breaker button has 
been replaced by this fuse and fuse card. Here is the procedure for switching 
from one voltage to another: 

1. Disconnect the AC power cord from the power panel. 

2. Slide open the transparent fuse box door in the AC power panel. Flip 
the fuse pull to remove the fuse. 

3. The fuse card is located underneath the fuse mounting. The current 
AC voltage setting of the system is visible as a number printed on the 
card (100, 120, 220, or 240). 

4. If you wish to change the indicated voltage setting, use needle-nose 
pliers to pull the fuse card from the fuse box. 

5. Turn the card and replace it in the fuse box so that the desired voltage 
rating is the only number visible. 

6. Replace the fuse and close the fuse box cover. 

7. Reconnect the AC power cord to the power panel. 
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6.3 POWER BOARD LAYOUT 

Here is the layout of the power supply board with the 11 5v and 230 v pins 
identified: 



CAP 115V 
CAP 230V 



TRANSFORMER 



DC HARNESS 
CONNECTORS (2) 




INTERCHANGEABLE 
PIN CONNECTORS 



GROUND CONNECTOR 
SK4 



Figure 6.3 Power Board Layout 

Pins 1 and 2 on the SKI connector provide neutral and live in that order. The 
three connectors SK2, SK3, and SK4 are identical, and are laid out as follows 
when looked at from above: 



power supply 



P1 


-12 


P2 


+ 12 


P3 


COM 


P4 


+ 5 



> 
> 
> 
> 



The power supply is fused. If this fuse burns out, replace it with another fuse 
of the same type (T2A250V). 
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7.0 Disk Drives 



7.1 DRIVES USED 

Two types of disk drives are used in the Osborne 1. The type supplied with 
your computer depends on when your Osborne 1 was made. Both Siemens 
and MPI disk drives are used, with the manufacturer-supphed electronics 
replaced with a Osborne-designed electronics board. 

7.2 DISK DRIVE INTERFACE BOARD 

As stated earlier, there have been numerous revisions on the disk drive 
interface board as described below: 

Rev A — Original release 

Rev B — Added jumper to U3 to stabilize erase current 

Rev C — RN2 substituted with discrete resistors 

Rev D — Added snubbing resistor and bypass capacitor 

Rev E — Incorporation of all changes 

Rev F — RN8 jump increases current through index LED 

Rev G-J — Snubbing capacitor (R39), discrete resistor (C5) eliminated 

Boards currently being shipped are designated Rev B which is 
distiguished from the earlier Rev B by a new part number 
1B10081. Changes between Rev G and the new Rev B disk 
board are: 

• Read filter was optimized for group delay response. 

• Servo circuitry optimized and top-adjust speed control pot added. 

• Stepper power-down option added. 

• Tantallum capacitors and bypass capacitors were added to reduce board 
noise. 

The layout of the disk drive board is shown in Figure 7.2. 
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Figure 7.2 Disk Drive Electronics Board Layout 
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7.3 DISK CONTROLLER AND PINOUTS 

The disk controller chip used on the main logic board is the Fujitsu 8877, 
equivalent to the Western Digital 1793. The following pinouts apply to the 
disk cable connector on the main logic board: 



pm 



1 


GND 


2 


GND 


3 


GND 


4 


GND 


5 


GND 


6 


GND 


7 


GND 


8 


INDEX 


9 


GND 


10 


DRIVE SELECT 1 


11 


+ 12 volts 


12 


DRIVE SELECT 2 


13 


+ 12 volts 


14 


NC 


15 


+ 12 volts 


16 


4m hz clock 


17 


+ 12 volts 


18 


DIR 


19 


GND 


20 


STEP 


21 


+5 volts 


22 


WRITE DATA 


23 


+5 volts 


24 


WRITE GATE 


25 


+ 5 volts 


26 


TRACK 00 


27 


GND 


28 


WRITE PROTECT 


29 


GND 


30 


READ DATA 


31 


GND 


32 


SIDE SELECT 


33 


GND 


34 


LATE 



Figure 7.3 Main Board Disic Cable Connector Pinouts 
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7.4 CP/M BIOS DISK ADDRESSING 

You can address the disk interface directly, although we strongly discourage 
this practice. If you must control the disk drives directly, do so through the 
standard CP/M BIOS calls: 

BIOS + 18 Move head to track on selected drive 

BIOS + IB Select disk-drive number 

BIOS + IE Set track number 

BIOS + 21 Set sector number 

BIOS + 24 Set the DMA address 

BIOS + 27 Read the selected sector 

BIOS + 2A Write the selected sector 

BIOS + 30 Translate the sector 



NOTE 



These calls are addressed with an offset from the start of BIOS for the 
particular revision of software being used. 



If you're familiar with the way CP/M handles disk I/O, you also know that 
"BDOS functions" are accessible through memory location 0005 hex. 

7.5 DISK INTERFACE 

The Osborne 1 does not allow transfers of data directly to memory in the first 
16K of memory space because the ROM and I/O in the second bank reside 
there. Instead, transfer information involving the first 16K of memory by first 
buffering the information in high memory (above BIOS) and then moving it 
into position. The opposite procedure occurs when you write information to 
the diskette from the initial 16K of memory. Use of the Z80 block-memory- 
move instruction makes this buffering transparent to users, and almost com- 
pletely cancels any speed penalty involved. 

7.6 DISK DRIVE SPECIFICATIONS 

• maximum seek time 20 milliseconds track to track 

• head load time milliseconds rotation time 200 milliseconds 

• utilizes standard FM recording 
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in DISK FORMAT 

The first track used for data is track 4 which contains the directory. Each entry 
consists of the standard CP/M format: one byte to indicate deletion, 11 bytes 
for the file name, and 20 bytes representing the "groups" assigned to the file. 

There are two unusual aspects of the Osborne I's use of the disk system. First, 
even though information is stored on the diskette in 10 sectors, to CP/M there 
are 20 sectors of 128 bytes each on the diskette. In other words, if you are using 
the Osborne 1 ROM routines, as documented, you'll be working with 10 
physical sectors of 256 bytes, but if you're working with CP/M BIOS or BDOS 
routines, you'll be dealing with 20 logical sectors of 128 bytes each. 

The disk medium used is the single-sided, single-density, soft-sectored 5 1/4- 
inch diskette. Data is stored on the diskette in 40 tracks of 10 256-byte sectors 
each, resulting in 102K of data storage per diskette. The Osborne double 
density option involves the addition of a small electronics board that inter- 
faces between the main logic board and the disk drives. With the double 
density option installed, the Osborne 1 stores data in a multitude of different 
formats, including: 

40 tracks 10 256-byte sectors (Osborne single density) 
40 tracks 5 1024-byte sectors (Osborne double density) 
40 tracks 8 512-byte sectors (IBM Personal Computer) 
40 tracks 18 128-byte sectors (Xerox 820 Computer) 
40 tracks 9 512-byte sectors (DEC 1820 double density) 

7.7.1 CP/M File Control Block 



Each file being accessed through CP/M must have a corresponding "File 
Control Block" which provides the name and allocation information for all 
subsequent file operations. The default FCB is located at BIOS + 05c hex and 
consists of 36 bytes of information: 
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5C drive code (0=current, 1=A, 2=B) 



6A 

6B 

6D 
6E 



Filename 



File Type 

Current extent number 
Reserved 

=0 on BDOS call to open, make, or search 
extent record count 



■ Disk record map 



Random record number 



Figure 7.7.1 File Control Block 

File Control Blocks are stored in the directory area of the disk and are brought 
into main memory when a file operation begins. The FCB in memory is 
updated as file operations occur and its attributes are recorded permanently 
when the file operation is completed. 



40 



Keyboard 



8.1 THE KEYBOARD 41 

8.2 KEYBOARD PINOUTS 41 

8.3 KEYBOARD LAYOUT 42 

8.4 KEYSWITCH MATRIX 42 

8.5 PROGRAMMABLE KEYS 43 



8.0 Keyboard 



8.1 THE KEYBOARD 

The Osborne 1 keyboard contains no electronics-it consists of a column /row 
matrix of keyswitches which are converted into data and addresses by a 
81LS95 and two 74LS05 chips. The data and addresses are then converted into 
ASCII key sequences by the monitor ROM, which uses a three-key rollover 
routine and maintains a lookup table for the conversion process. 

8.2 KEYBOARD PINOUTS 

The pinouts on the keyboard are as follows: 



pin 



1 


ground 


2 


row 4 


3 


row 


4 


row 3 


5 


row 6 used for address 


6 


row 2 


7 


row 5 


8 


row 1 


9 


row 7 


10 


col 


11 


col 1 


12 


col 2 


13 


col 3 used for data 


14 


col 4 


15 


col 5 


16 


col 6 


17 


col 7 


18 


no connection 


19 


no connection 


20 


ground 



Figure 8.2 Keyboard Pinouts 
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8.3 KEYBOARD LAYOUT 

The keys are laid out as follows (graphic characters are also shown): 





imsi 3 iTimisiiiM ^MaiiiHL 


f^MJlMSimiK 


H 


[MSM 


WR 


gM 


1 CTF 




m 


mmii 


mk 


M< 


5i®^ 


1 ■ ..™ 


S3 




EnraaiaiHiziHaiiiiiiifflimiB 










1 







Figure 8.3 Osborne 1 Key Layout 

8.4 KEYSWITCH MATRIX 

The matrix used to convert the keyswitches to ASCII is as follows: 





PI 


















AO 


3 
8 

7 
6 
4 
2 

5 
9 


ESC 


TAB 


CTRL 




SHIFT 


RET 
ENT 


' ' 


1 
1 


A1 


/I 


2/ 
X 2 


3/ 
/ 3 


X 


5/ 

/ 5 


X 6 


7 / 
/7 


X 


A5 


f> 





X 


S P 

R 


> 

% 


p 





9/ 
/ 9 


A2 


Q 


W 


E 


T 


Y 


U 


1 


A3 


A 


S 


D 


F 


G 


H 


J 


K 


A4 


z 


X 


C 


V 


B 


N 


M 


< 

/ 
+ 


A6 


^> 


i} 


— 


7 

/ 




1 
\ 


L 


A7 








ALPHA 
LOCK 










GND 

\ 


/2C 


10 11 12 13 14 15 16 17 



GND DO D1 D2 D3 D4 D5 D6 D7 

RFI AND 
STATIC SHIELD 

Figure 8.4 Key Switch iVIatrix 
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8.5 PROGRAMMABLE KEYS 

In addition to the normal ASCII keystrokes allowed, 14 programmable keys 
have been added to the Osborne 1. These keys («0 through «9, and the four 
arrow keys) are converted by a routine in BIOS to any series of keystrokes up 
to 96 (for all 14 keys). The function keys (0-9) are programmed through the 
SETUP program located on the System program diskette. 
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9.0 Assembly And 
Disassembly 



9.1 VARIATIONS IN DESIGN 

This section provides the instructions needed to dismantel the Osborne 1 into 
its various components and re-assemble it. The case in which the computer is 
currently being shipped has been redesigned. The following instructions 
pertain to both the original and the new case; except where a slight deviation 
in procedure or extra step need be noted. Two sections on the Bezel /Chasis 
and the Video Monitor are provided since the difference between the two 
cases with regard to these items is substantial enough to warrant separate 
descriptions. Information in this section was extracted from the Osborne 
Field Service Manual. 

9.2 KEYBOARD 

9.2.1 Keyboard Disassembly: 

CAUTION: Identify connector orientations before detaching any cable. 

1. Disconnect computer from power source. 

2. Disconnect the keyboard cable from the front Bezel by spreading the 
latches of the keyboard connector. 

3. Using a pad or soft material to protect the keyboard, turn the key- 
board assembly over so the keys face down. 

4. Remove the 6/32 Phillips screw located at each latch end of the 
keyboard case. 

5. Remove the keyboard case from the keyboard and keyboard bezel 
assembly. 

6. Carefully remove the keyboard harness from the double back tape 
located on both the keyboard Bezel and keyboard. (There is no tape on 
the blue case). 

7. Carefully remove the keyboard harness from the keyboard connector. 
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NOTE 

The keyboard harness is aligned with Pin 1 of the keyboard connec- 
tor. Looking at the underside of the keyboard with the numeric row 
of keys to the top, Pin 1 is the upper right Pin. 



8. Remove four 8/32 Phillips screws which secure the keyboard to the 
standoffs. 

9. Remove the keyswitch array from the keyboard Bezel. 

9.2.2 Keyboard Assembly: 

1. Place the keyboard Bezel onto a Pad or Soft material (to protect the 
keyboard), standoffs facing up. 

2. Align the keyswitch array face down with cutouts on keyboard Bezel. 

3. Install four 8/32 Phillips screws to secure the keyboard to the bezel 
standoffs. 

4. (This step does not apply to the blue case). Locate the notch on the 
long edge of the keyboard Bezel furthest from the "space" bar. There 
should be a 1 1/2-2 inch length of double-backed tape on the 
underside of the Bezel at this notch. Affix tape if necessary. 

5. (This step does not apply to the blue case). Check that there is also a 1 
1/2-2 inch length of double-backed tape near the keyboard connector 
on the underside of the keyboard. Affix tape if necessary. 

6. Connect Pin 1 (black stripe or thick ground wire) on the keyboard 
harness to Pin 1 of the keyboard connector on the underside of the 
keyboard. 

NOTE 

To locate Pin 1 of the keyboard connector, position the keyboard 
with the numeric row of keys to the top. Facing the underside of the 
keyboard. Pin 1 is in the upper right corner of the keyboard connec- 
tor. On the keyboard Harness, Pin 1 is identified by a black stripe. 
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7. Position the keyboard harness in the notch on the long edge of the 
keyboard bezel and press it flat against both lengths of tape. (No tape 
on blue case). 

8. Lower the keyboard case onto the keyboard and keyboard Bezel as- 
sembly so the Case and Bezel are flush. 

9. Install the 6/32 Phillips screw located on each latch end of the key- 
board case to secure it to the keyboard assembly. 

10. Turn keyboard face up and connect the keyboard cable to the key- 
board connector below the CRT screen. 

9.3 ORIGINAL AND NEW BEZEL/CHASSIS 

9.3.1 Original Bezel And Chasis Disassembly 

1. Disconnect computer from power source. 

2. Disconnect the keyboard cable from the front bezel by spreading the 
latches on the keyboard connector. 

3. Remove all external cables ( ie. RS-232, Modem, External Video, etc.). 

4. Using a 1/20 inch Allen wrench, remove the video knobs. 

5. Remove the 6/32 x 1/4 inch Phillips screws surrounding the bezel. 

6. Placing thumbs below CRT screen and fingers in the disk storage 
pockets, apply a slight pressure inward with fingers, and pull bezel 
straight forward. 

7. With the Osborne 1 resting flat on its rubber feet, turn it so the A/C 
power panel faces you. 

8. Remove the two 6/32 x 1/4 inch Phillips screws from above and 
below the handle. Mark these screws FOR HANDLE and set aside. 

NOTE 

Using an incorrect screw may puncture the Disk harness running 
behind the handle assembly. 
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9. Remove the six 6 / 32 Phillips screws securing the A / C Power panel to 
the case. Note that the two upper screws have washers. Mark these 
two screws FOR A/C POWER PANEL and set aside. Using an incor- 
rect screw may puncture the Drive harness. 

10. With the Osborne 1 resting flat on its rubber feet, turn it so the CRT 
screen faces you. 

11. Remove either the two or the four 8/32 x 1/2 inch Phillips screws 
which hold the chassis to the case. These are located on the left and 
right inside forward edges of the chassis. 

12. Grasp the chassis assembly between the CRT and the Logic board. Lift 
the assembly slightly and pull it straight forward. Be careful when 
removing the chassis from the case. The A/C power panel will be 
dragging behind the chassis by wires only. 

13. Pull remaining power cord through case. 

9.3.2 Original Case Assembly: 

1. Position the chassis assembly with disk drives on top, CRT screen 
facing you. 

2. Place the case behind chassis assembly, AC power panel recess to the 
rear right. 

3. Pull power cord through case until DC harness is taut or AC power 
panel is at case recess. 

4. Grasp the chassis assembly between the CRT and the logic board. Lift 
the assembly slightly and push it straight back into the case. Be sure 
the AC Power panel is positioned correctly in its case recess. 

NOTE 

When installing chassis into case be sure not to pinch, trap or rip 
harness assemblies. 



5. Install either two or four 8/32 x 1/2 inch Phillips screws on the left 
and right inside front edges of the chassis to secure it to the case. 
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6. Keeping the Osborne 1 flat on its rubber feet, turn it so the A / C power 
panel faces you. 

7. Install six 6/32 Phillips screws to secure the A/C power panel to the 
case. The two upper screws MUST be 6/32 x 1/4 inch with washers. 
These were marked FOR A/C POWER PANEL. An incorrect upper 
screw may puncture the drive harness. 

8. Install the two 6/32 x 1/4 inch Phillips screws above and below the 
handle. These screws were marked "FOR HANDLE". Using an incor- 
rect screw may puncture the disk harness behind the handle 
assembly. 

9. Keeping the Osborne 1 flat on its rubber feet, turn it so the CRT screen 
faces you. 

10. Grasping bezel with thumbs below CRT screen cutout and fingers in 
the disk storage pockets, slide bezel completely into case. 

11. Install the 6/32 Phillips screws surrounding the bezel to secure it to 
the case. 

12. Using a 1/20 inch Allen wrench, install the brightness and contrast 
knobs onto their shafts. 

13. With the keyboard assembly in front of the Osborne 1, connect the 
keyboard cable to the keyboard connector below the CRT screen. 



9.3.3 New Case Disassembly: 



CAUTION 

The interior of the case is coated with a special metallic paint. Avoid 
scratching this coating. 



1. Disconnect computer from power source. 

2. Disconnect the keyboard cable from the front bezel by spreading the 
latches on the keyboard connector. 

3. Remove all external cables (RS-232, modem, external video, etc.). 

4. Pull the video contrast and brightness knobs off their shafts. 
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5. Remove the 6/32 x 1/4 inch Phillips screws surrounding the bezel. 

6. Placing thumbs below CRT screen and fingers in the disk storage 
pockets, apply a slight pressure inward with fingers to loosen the 
bezel. 

7. Grasp the bezel near the carrying-case latches and carefully pull it 
straight forward until it is free. 

8. Remove the AC power cord from the power cord compartment. 

9. Carefully turn the unit over so ventilation slots are on the bottom. 

10. Remove five long 6/32 Phillips screws holding the two halves of the 
carrying case together. 

11. Hold down the carrying handle plate and the power cord compart- 
ment and lift the upper half of the case free of the unit. 

NOTE 

The logic board and the power supply unit can he replaced at this 
point without further disassembly of the chassis. To further disman- 
tle the unit, proceed as follows: 



12. Slide the carrying handle plate out of the lower part of the case. Note 
that the broad area of the plate is below the handle at this point. 

13. Lift the power cord compartment slightly and detach the door. 

14. Place one hand under the front of the video monitor and the other at 
the back of the monitor and lift the chassis out of the case. Be sure that 
the AC power cord compartment lifts freely with the chassis. 



9.3.4 New Case Assembly: 



1. Position the chassis assembly so the logic-board is up, CRT screen 
facing technician. 

2. Place the top half of the carrying case (the part with the ventilation 
slots) upside down with latches closest to you. 

3. Place one hand under the front of the video monitor and the other at 
the back of the monitor and lift the chassis into the top half of the 
carrying case. 
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NOTE 

When installing the chassis into the case, be careful not to pinch, 
trap, or rip harness assemblies. 



4. Align screw holes in the chassis with the five mounting standoffs in 
the case. 

5. Position the video harness and DC cables in the tab on the "B" drive 
shield. 

6. Slide the AC power cord compartment into the case, fuse at the top 
and facing out. 

7. Attach the power cord compartment door. 

8. Slide the carrying handle plate into the case. The broad area of the 
plate is below the handle at this point. 

9. Place the lower half of the case onto the chassis assembly. Be sure that 
the AC power compartment, carrying handle plate, and upper and 
lower halves of the case align properly. 

10. Install five long 6/32 Phillips screws which hold both halves of the 
case together. Tighten these screws until they are snug. Do not 
overtighten! 

11. Turn the unit over so the ventilation slots are on top and CRT screen 
facing you. 

12. Placing thumbs below CRT screen cutout and fingers in the disk 
storage pockets, slide the bezel into the chassis. 

13. Install the 6/32 Phillips screws which secure the bezel to the front of 
the chassis. Do not overtighten these screws! 

14. Carefully push the video control knobs onto their shafts. 

15. With the keyboard assembly in front of the unit, connect the key- 
board cable to the keyboard connection below the CRT screen. Facing 
the screen, the cable connects from the left. 
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9.4 LOGIC BOARD 

9.4.1 Logic Board Disassembly: 



1. Position the chassis assembly with the logic board facing up and the 
CRT screen facing you. 

2. Remove the 6 / 32 Phillips screw at each corner of the logic board. The 
screw in the right front corner of some logic boards has a nylon 
insulation washer. 

3. Lift the logic board by the front edge and hold it perpendicular to the 
chassis, video control shafts pointing straight up. Make note of all 
connector orientations while still connected. 

4. Remove the DC harness connector located in the extreme lower left 
corner of the logic board. The DC harness connector is not keyed. The 
RED wire on the harness must go to the left. (On the blue case, the 
connector is keyed by the "lip" on one side. 5. Remove the disk 
harness connector located in the lower left corner of the logic board at 
the right of the DC harness connector. Grip the connector and CARE- 
FULLY detach it, being sure not to bend any pins.) 

NOTE 

The disk drive harness connector is not keyed. The RED stripe on 
the harness must go to the right. 



6. Remove the video harness connector located in the upper left corner 
of the logic board to the right of the reset button. 



NOTE 

The Video harness connector is not keyed. The RED wire on the 
harness must go to the left. 



7. Remove external video plug located between the reset button and 
video contrast shaft on the front edge of the logic board. 

8. Remove the logic board. 
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9.4.2 Logic Board Assembly: 

1. Position the chassis assembly with its logic-board side up, and CRT 
screen facing you. 

2. Hold the logic board perpendicular to the chassis, component-side 
facing you, video control shafts pointing straight up. 

3. Connect the external video plug to the connector on the edge of the 
logic board between the reset button and video contrast shaft. 

4. With the video harness running below the logic board, attach the 
video harness connector to the 10-Pin connection on the logic board 
between reset button and the contrast shaft, RED WIRE TO THE LEFT. 

5. With the DC harness running below the logic board, attach the DC 
harness connector to the 7-Pin connection in the extreme left lower 
corner of the logic board, RED WIRE TO THE LEFT. 

6. With the disk harness running below the logic board, attach the disk 
harness connector to the 34 Pin connection located at the lower left, of 
the logic board's to the right of the DC harness. RED STRIPE TO THE 
RIGHT 

7. Lower the logic board onto its chassis mounting blocks. 

8. Install a 6/32 Phillips screw with star washer at each corner of the 
logic board. The screw in the right front corner of some older logic 
boards has a nylon insulation washer to protect the trace. 

9.5 ORIGINAL AND NEW VIDEO MONITOR 

9.5.1 Original Monitor Disassembly; 

1. Disassemble the chasis and bezel following earlier instructions. 

2. Position the chassis assembly with the logic-board side up and CRT 
screen facing you. 

3. Remove the four 6/32 Phillips screws securing the monitor to the 
chassis. 

4. Grasp the left and right sides of the chassis assembly and carefully lift 
away to expose the underside of the monitor. 
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5. Remove the video harness connector located at the top rear of the 
video PC board. This is a keyed connector. 

9.5.2 Original Monitor Assembly: 

1. Position the chassis assembly vertically with handle on v^ork bench 
and drive shields facing you. 

2. If the video harness has been removed, insert the small end-connector 
of the harness through the left rear slot of the video shield from the 
inside. 

3. Place the video monitor in front of chassis assembly, CRT screen 
facing you and keyed PC board connection at top rear. 

4. Connect the keyed large end-connector of the video harness to the 
rear of the monitor PC board. 

5. Grasp the left and right sides of the chassis assembly. Lift the chassis 
and carefully lower it onto the video monitor. 

6. Align the monitor with the four screw holes in the chassis, install four 
6/32 Phillips screws to secure the monitor to the chassis. 

9.5.3 Blue Case Monitor Disassembly: 

L Position the chassis assembly with its logic-board side up and CRT 
screen facing you. 

2. Slip the video harness cable from its tab on the chassis. 

3. Disconnect the slip-on ground wire from its connection at the back of 
the video monitor shield. 

4. Remove the disk drive from the four fasteners holding it to the back 
of the video shield. 

5. Remove the video harness connector located at the top rear of the 
video PC board. This is a keyed connector. 

6. Remove four 6/32 Phillips screws securing the monitor to the chassis 
assembly. 

7. Remove the video monitor from its shield. 

8. Remove the transparent face plate from the monitor screen. 
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9.5.4 Blue Case Monitor Assembly: 

L Position the video monitor in front of the chassis assembly, CRT 
screen facing you and keyed video PC board connection at top rear. 

2. Lower the video monitor shield onto the monitor and align the moni- 
tor and monitor shield screw holes. 

3. Connect the keyed, large end-connector of the video harnesss to the 
rear of the monitor PC board. 

4. Grasp the left and right sides of the chassis assembly. Lift the chassis 
and carefully lower it onto the video monitor. Do not crimp any wires. 

5. Align the monitor with the four screw holes in the chassis. Install four 
6/32 Phillips screws to secure the monitor to the chassis. 

6. Attach the slip-on ground connector to the connection at the rear of 
the video monitor shield. 

7. Slip the disk drive harness into the four fasteners on the back of the 
video monitor shield. 

8. Replace the transparent face plate on the monitor screen. 

9.6 POWER SUPPLY 

9.6.1 Power Supply Disassembly: 

WARNING 

Working with Power Supplies is DANGEROUS. Power Supplies 
can hold an electrical charge for long periods of time. Be careful not 
to touch any components unnecessarily! 



1. Disassemble the Osborne- 1 chasis and bezel as described earlier. 

2. Position the chassis assembly logic-board-side-up and CRT screen 
facing away from you. 

3. Remove the 6 / 32 Phillips screw from each corner of the power supply 
unit. 
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4. With the wires still attached, carefully lift the power supply out of the 
chassis. 

5. Turn the power supply over left-to-right so the components face you 
and the five large capacitors are in the lower left corner. 

6. Remove the DC harness connector from the power supply. This keyed 
connector is attached to one of the three identical male connectors on 
the left side of the power supply. 

7. Remove the ground wire connector from the power supply. This is a 
slip-on connector located in the upper left corner of the power supply. 

8. Remove the AC input connector from the power supply. This is a 
keyed connector located left of the fuse on the upper side of the power 
supply. 

9. (This step applies only to the blue case). Remove both interchange- 
able pin connectors from the 115V and 230V pins on the power 
supply. 



9.6.2 Power Supply Assembly: 

NOTE 

Power Supply procedures are with DC harness installed in Chassis. 



1. Position the chassis assembly with its logic-board side up and handle 
facing you. 

2. Turn the power supply so the components face you and the five large 
capacitors are in the lower left corner. 

3. Attach the AC input connector to the keyed connector located left of 
the fuse on the power supply. 

4. Attach the slip-on ground wire connector to the ground connection in 
the upper left corner of the power supply. 

5. Attach the keyed DC harness connector to one of the three identical 
male connectors on the left side of the power supply. 
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6. With the wires attached, turn the power supply over, from right to 
left, so the DC connector is to the right. Carefully insert the power 
supply into chassis. 

7. Align the screw holes on the power supply PC board with the chassis 
assembly standoffs. 

8. Install a 6/32 Phillips screw and washer in each corner of the power 
supply. Use a metal star washer in the upper right corner. Use nylon 
washers on the other three corners. 

9. (This step applies only to the blue case). Slip the power supply har- 
ness into its tab on the chassis. 



9.7 DISK DRIVES 

9.7.1 Disk Drive Disassembly: 



NOTE 

The A drive has an 8-pin 150-OHM Terminator resistor pack. B 
DRIVE DOES NOT. 



1. Disassemble the Osborne 1 chasis and bezel as described earlier. 

2. Position the chassis assembly with its logic-board side up and handle 
facing away from you. 

3. Remove the four 6/32 Phillips screws holding the "A" drive to the 
chassis assembly. 

NOTE 

Disk drive A is the drive closest to the power supply. 



4. With the wires still connected, pivot the shielded drive horizontally 
to the right 90 degrees from its original position. 

5. (This step applies only to the blue case). Remove the disk harness 
connector and the ground connector from drive. The disk harness 
connector is at the rear of the drive PC board. The slip-on ground 
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connector is located at the rear of the drive either on the drive frame 
or the drive shield. 

6. Remove the two 6/32 Phillips screws which hold the shield to the 
drive. These screws are located on the left and right sides of the drive. 

7. Hold the drive shield down and lift the drive up enough to access the 
rear of the drive. 

8. Remove the disk harness connector and the ground connector from 
drive. The disk harness connector is at the rear of the drive PC board. 
The slip-on ground connector is located at the rear of the drive either 
on the drive frame or the drive shield. 

NOTE 

The disk drive harness is not keyed. Facing the back of the drive 
with the strobe wheel side up, the harness is always connected RED 
STRIPE to the RIGHT 



9. Remove drive from shield. 

10. If drive A is being replaced with another, remove the 8 pin terminator 
from the drive PC board and KEEP IT for installation on the new 
drive. The terminator is located at position RN3 on the right rear 
corner of the PC board. 



9.7.2 Disk Drive Assembly: 



1. Install terminator resistor pack at position RN3 of PC board, (for 
Drive A) 

2. Place drive in shield with PC board facing down. 

3. Position the chassis assembly with its logic-board side up and handle 
facing away from you. 

4. Place shielded drive next to chassis assembly, strobe wheel facing up, 
drive door facing away from chassis. 

5. Hold the drive shield down and move the drive enough to access the 
rear of the drive. 
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6. Insert the broad drive connector on the end of the drive harness 
through the rectangular slot at the rear of the drive shield. Connect 
the drive connector to the rear of the PC board, RED STRIPE on 
harness edge closest to you. 

7. Connect the narrow slip-on ground connector to the male tab located 
at the rear of the drive either on the drive frame or the drive shield. 

8. Align drive with screw holes in the drive shield. Install one 6/32 
Phillips screw with star washer in each side of the drive. 

9. Slide drive under chassis assembly with drive door facing you. Install 
the four 6/32 Phillips screws which secure the "A" drive to the 
chassis. 



9.8 POWER PANEL 

Figure 9.8 identifies the DC harness and its connectors: 

9.8.1 Power Panel Disassembly: 

1. Disassemble the Osborne 1 chasis and bezel as discribed earlier. 

2. Remove the ground wire to the video monitor shield. 

3. Remove the ground wire from each disk drive shield. 

4. Remove the thermal relay from its clip on the chassis. The AC power 
panel should now be completely disconnected from the chassis. 

5. Remove the screws which hold the AC power panel to the back of the 
power panel compartment. 

6. Position the AC power panel with connections facing the technician, 
switch assembly in lower left corner, ground wires in lower right 
corner. 

7. Disconnect the five-wire slip-on ground connector from the lower 
right corner of the power panel. 

8. Disconnect both interchangeable pin connectors from pins "C" and 
"D" of the power panel. 
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Interchangeable 115V and 230V 
Pin Connectors to Power Supply 



Figure 9.8 DC Power Harness 



60 



CHAPTER NINE ASSEMBLY AND DISASSEMBLY 

9. Disconnect both lower wires from the switch assembly in the lower 
left corner of the power panel. Do not disconnect the upper wires. 

10. Detach the thermal relay from the wire harness. 

9.8.2 Power Panel Assembly 

1. Connect two slip-on connectors, I and J, to the thermal relay. 

2. Position the AC power panel with connectors facing you, switch 
assembly in lower left corner, and ground wire connnection at lower 
right. 

3. Connect the five-wire ground cable B to the connector in the lower 
right corner of the power panel. 

4. Connect the AC output wires E and F to the lower connectors on the 
power panel switch assembly. Connect F, which runs to the thermal 
relay, to the right of E. 

5. Connect two interchangeable pin connectors, C and D, to pins "C" 
and "D" of the power panel. 

6. Align the power panel with the screw holes on the rear of the power 
panel compartment. Position the fuse box furthest from the door 
hinge cutouts on the power panel compartment. 

7. Install four 6/32 Phillips screws which secure the power panel to the 
back of the power panel compartment. 

8. Fasten the thermal relay to its chassis mounting clip beneath the 
power supply unit. 

9. Place the thermal relay wires 1 and J in their notch on the chassis. This 
prevents pinching of the wires between chassis and case. 
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10.0 Osborne 1 Software 



10.1 SOFTWARE REVISIONS 

Following are the monitor ROM and BIOS revision levels to date, and a 
summary of the modifications that have been made: 

ROM revisions 

REV A — contains diagnostics, limits boot to one fixed address. This version 
was subsequently upgraded. 

REV 1.2 — supports configurable CP/M system through MOVCPM, adds 
three key rollover. 

REV 1.3 — Clock removed, disk drivers modified. 

REV 1.4 — allows multi-density format, I/O functions moved from BIOS to 
ROM, graphics offset added, and increased size of BMRAM. 

REV 1.4.1 — fixes reset jump 

BIOS revisions 

Rev A — original BIOS; subsequently upgraded. 

Rev 1.2 — supports parallel IEEE, adds function keys and printer protocals 
(XON/XOFF, ETX-ACK). 

Rev 1.3 — allows WordStar to run from serial terminal, fix of XON/XOFF and 
timing of serial port. 

Rev 1.4 — adds printer initialization string, IEEE device addressing, BIOS 
modified to preserve IX and lY registers, added ability for recognition of 
different disk formats. 

Since improvements to ROM and BIOS and subsequent release of this soft- 
ware were made in tandem, both have the same revision numbers. You can 
determine the address of BDOS and CCP for any version by using the starting 
address of BIOS for each release shown below: 
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Version # 


start of BIOS 


Rev A 


EAOO 


Rev 1.2 


E600 


Rev 1.2.1 


E500 


Rev 1.3 


E500 


Rev 1.4 


ElOO 



10.2 THE MONITOR ROM 

The monitor ROM consists of 10 assembly language source modules: 

• ROM initialization and startup 

• CP/M boot routines 

• Console routines 

• PIA routines 

• ACIA routines 

• Disk routines 

• Diagnostic routines (not after 1.2) 

• Formatting routines 

• Utilities 

• RAM linkages 

The initialization routines set the computer into a known state, display a 
message to the user, then wait for the user's response. Three responses are 
allowed: 

RETURN boot from disk drive A 
boot from disk drive B 
'^[ homes screen 

In addition, a jump table is located at location 0100 hex which parallels the 
jump table of BIOS. 

The bootstrap loader in ROM loads CP/M from the diskette using the follow- 
ing assumptions: 

Pre-1.4 ROM single density 

track sectors 1 - 8 CCP 

sectors 9 - 10 BDOS 

track 1 sectors 1 - 10 BDOS 

track 2 sectors 1 - 2 BDOS 

sectors 3 - 10 BIOS 
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1.4 ROM 

track sectors 1 - 2 CCP 

sectors 3 - 5 BDOS 

track 1 sectors 1-1.5 BDOS 

sectors 1.5 - 2.5 BIOS 

The boot routines in BidS are responsible for displaying the sign-on message 
(if any), and for setting up the base page parameters. 

10.2.1 Console Routines 

The console routines include the special commands which the Osborne 1 
recognizes as terminal control functions. In particular, the Osborne 1 emu- 
lates many of the functions which control the TeleVideo 912 and 920 
terminals: 





ASCII 




Hex 


Control 




Sequence 


Code 


Description of Action 


07 


'^G 


rings the bell 


OB 


'^K 


moves cursor up 


OA 


'^J 


moves cursor down 


OC 


'^L 


moves cursor right 


08 


'^H 


moves cursor left 


lA 


^Z 


clears screen and homes cursor 


IE 




homes cursor 


IB 23 


ESC# 


locks keyboard 


IB 22 


ESC " 


unlocks keyboard 


IB 3D 


ESC = 


cursor XY positioning 


IB 53 


ESCS 


screen XY positioning 


IB 51 


ESCQ 


insert character 


IB 57 


ESC W 


delete character 


IB 45 


ESCE 


insert line 


IB 52 


ESCR 


delete line 


IB 54 


ESCT 


clear to end of line 


IB 29 


ESC) 


start half intensity display 


IB 28 


ESC( 


end half intensity display 


1B4C 


ESCL 


start underline display 


1B4D 


ESCM 


end underline display 


IB 67 


ESCg 


start graphics display 


IB 47 


ESCG 


end graphics display 


1B5B 


ESC[ 


honies screen 



The console routines are responsible for keyboard input, console output, bell 
ringing, updating the real-time clock, and checking to see if the disk drive 
should be deactivated. 
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10.2.2 Other Interface Routines 

The parallel, serial, and disk interface routines directly control the 6821, 6850, 
and 1793 chips through memory-mapped I/O. 

Diagnostics for the keyboard, memory, and diskette are provided in the 
ROM, as well as routines to bootstrap from either disk drive, and to load 
special test programs via the serial port if the disk drives are not functioning. 
These diagnostics have been removed from the 1.4 ROM and Osborne Com- 
puter Corporation will be providing an optional system test to replace the 
missing diagnostics in the near future. 

10.2.3 ROM Listings 

The current ROM was coded by several different organizations under the 
direction of Osborne Computer Corporation. Nevertheless, all maintanence 
and modification of the ROM is performed by the software department at 
Osborne Computer Corporation. The listings that follow were created with 
the Sorcim ACT I assembler and fully utilize Z80 code. 

Listings for the 1.3 Monitor ROM, followed by the most current 1.4 Monitor 
ROM are included at the back of this manual. 



10.3 BDOS CALLS 



Function 




Entry 


Return 


Number 


Description 


Values 


Values 





system reset 






1 


console read 




A = character 


2 


console write 


E= character 




3 


reader read 




A = character 


4 


punch write 


E= character 




5 


list write 


E= character 




6 


direct I/O 


E=type* 


A=0 if busy 


7 


get lOBYTE 




A=IOBYTE 


8 


set lOBYTE 


E=IOBYTE 




9 


print string 


DE= address 




10 


read console buffer 


DE= address 




11 


get console status 




A = status 


12 


get version number 




HL= version # 


13 


reset disk 






14 


select disk 


E= drive 


A= found *** 
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Function 


Entry 


Return 


Number 


Description 


Values 


Values 


15 


open file 


E= drive 


A = found *** 


16 


close file 


DE=FCB address 


A=found *** 


17 


search for file 


DE=FCB address 


A=found *** 


18 


search for next 




A=found *** 


19 


delete file 


DE=FCB address 


A=found *** 


20 


read next record 


DE=FCB address 


A=found *** 


21 


create file 


DE=FCB address 


A=found *** 


22 


create file 


DE=FCB address 


A=found *** 


23 


rename file 


DE=FCB address 


A=found *** 


24 


get login vector 




HL= drive 


25 


get disk number 




A = drive 


26 


set DMA address 


DE=DMA addresE 


> 


27 


get allocate vector 




HL= allocation 


28 


write protect 






29 


get R/O vector 




HL = R/0 vector 


30 


set file attributes 


DE=FCB address 


A = found *** 


31 


get disk header address 


HL = address 


32 


set /get user number 


D=FF (get) 
code (set) 


A = user # 


33 


read random 


DE=FCB address 


A=error *** 


34 


write random 


DE=FCB address 


A=error *** 


35 


compute file size 


DE=FCB address 


A = record 


36 


set random record 


DE=FCB address 


A = record 


37 


reset drive 


DE= drive vector 


A=0 


38 


write random zero fil 


1DE=FCB address 


A=error *** 



coded in C register 
*type: FF = input from console 

all else = character to output to console 



status: 



'found: 



00 = not ready 
FF = ready 

FF = not found 
00 = valid entry 



1 = reading unwritten data 

3 = cannot close current extent 

4 = seek to unwritten extent 

5 = directory overflow 

6 = seek past physical end of disk 



Drive numbers are coded: = A 1 = B 



NOTE 

You must set the random record position (7D-7F hex) before reading or 
writing random records. 
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10.4 OSBORNE 1 BIOS ROUTINES 

The BIOS routines supplied by Osborne Computer Corporation include sev- 
eral additional functions to the standard BIOS CP/M expects. 

10.4.1 The lOBYTE 

The lOBYTE is a reserved memory location (0003 hex) which defines the 
current assignment of physical to logical devices. The lOBYTE is divided into 
four distinct fields for the four logical devices recognized by CP/M. The 
logical device names are now obsolete (i.e., do not match Osborne physical 
device names) and are used only for the sake of maintaining the standard 
CP/M nomenclature. There are four logical devices each of which takes up 
two bits as follows: 



Bit 

7 


Bit 
6 


Bit 

5 


Bit 
4 


Bit 

3 


Bit 

2 


Bit 
1 


Bit 




LIST 



PUNCH 



READER 



CONSOLE 



A value in the range 00 to 11 hex (0 to 3 decimal) determines the assignment of 
each logical device as follows: 



Logical 


Value 


CP/M 


Osborne 


Device 




Physical 


Physical 


Console 


00 


TTY: 


Keyboard + Screen 


(CON:) 


01 


CRT: 


Serial Port 




10 


BAT: 


Parallel Port 




11 


UCl: 


IEEE Port 


Reader 


00 


TTY: 


Keyboard + Screen 


(RDR:) 


01 


PTR: 


Serial Port 




10 


URl: 


Parallel Port 




11 


UR2: 


IEEE Port 


Punch 


00 


TTY: 


Keyboard + Screen 


(PUN:) 


01 


PTR: 


Serial Port 




10 


UPl: 


Parallel Port 




11 


UP2: 


IEEE Port 


List 


00 


TTY: 


Keyboard + Screen 


(LST:) 


01 


CRT: 


Serial Port 




10 


LPT: 


Parallel (Centronics) 




11 


ULl: 


IEEE Port 
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Besides fully implementing the CP/M lOBYTE, routines are provided to 
drive printers which require XON/XOFF or ETX/ACK protocols. Automatic 
horizontal scrolling, screen size for word wrap, default baud rate and pro- 
gramming of the function keys are maintained by the BIOS. 

10.4.2 BIOS Listings 

The BIOS listings are included at the end of this manual. 
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11.0 Theory of Operations 



11.1 INTRODUCTION 

This chapter provides a functional description of the Osborne 1 Computer 
functions. To understand this chapter, an understanding of digital Logic and 
TTL (transistor-transistor-Logic) is required. 

11.2 FUNCTIONAL OPERATION 

The major functional areas of the Osborne 1 Computer as shown on Figure 
11.2 are: Basic Timing, CPU, ROM, RAM, Video System, Parallel I/O, Serial 
I/O, Keyboard, and Disk System. 

The basic timing originates with a 16 MHz crystal oscillator. The 15.9744 MHz 
signal is divided down to provide nominal 8, 4, 2, and 1 MHz signals to 
control other circuits of the system. 

The (CPU) Central Processor Unit controls and communicates with the re- 
mainder of the system through an 8-bit data bus and a 16-bit address bus. In 
addition to the two busses shown on the diagram, the CPU has several 
additional inputs and outputs that are not shown on the block diagram. These 
inputs and outputs are control functions and will be described later. 

The (ROM) Read Only Memory is a 4 kilobyte Read-Only Memory with tri- 
state outputs connected to the data bus. When the ROM is enabled, data 
stored at the address on the address bus is put on the data bus. 

The Random Access Memory (RAM) is a 64 kilobyte dynamic memory. The 
RAM data outputs are tied to the data bus through a gate that is enabled only 
when the CPU accesses RAM. The RAM can be accessed by the video logic 
also. RAM output for the video display is latched, then fed into the address 
inputs of a two kilobyte EPROM, called the character generator. This EPROM 
has dot patterns stored in it and is not connected with the CPU data or address 
busses. Its outputs go to a shift register where the dot pattern is shifted out 
(one at a time) to the video interface, and then to the CRT. 

The disk system consists of a disk controller and two disk drives. It receives 
and transmits data on the CPU data bus and is addressed by the address bus. 
The disk system uses single density Osborne disks. 
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Figure 11.2 — Functional Block Diagram 

The Osborne 1 can interface with IEEE 488 and RS-232-C standard external 
busses. There is also a MODEM port. The RS-232-C serial data communica- 
tions port uses a universal asynchronous receiver /transmitter (UART). The 
UART can send and receive, through an external MODEM (MOdulator/ 
DEModulator), over telephone lines. 

Another connector on the front panel is for an optional larger monitor; the 
last connector is for connecting an optional battery pack for operating the 
computer where no commercial power is available. 



11.3 MNEMONIC CODES: 



Mnemonic 



Description 



Function 



CAS 



DOT CLK 



Column Address Strobe 



Dot clock 



NMI 
RAS 



Non Maskable Interrupt 
Row Address Strobe 



Strobes RAM column 
address 

Used in conjunction with 

the Character Generator 

and video logic to 

produce dot patterns on 

display 

Restarts ROM program 

Stobes RAM row address 
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11.4 BASIC TIMING 

Crystal controlled oscillator XI operates at 15.9744 MHz. The oscillator output 
is buffered by UB13. The oscillator circuit output at a nominal 16 MHz is used 
as 62 NSEC timing signal and is also used to clock 4-bit synchronous counter 
UBll (on the positive edge of the clock) to develop additional timing signals 
of 8, 4, 2, and 1 MHz (Figure 11.4). 

The 8 MHz is inverted by UAH and becomes the dot clock (DOT CLK). One 
of the destinations of DOT CLK is Shift Register UA14 (Sheet 4 of the Schema- 
tic); UA14 is positive edge sensitive which is the reason for inverting DOT 
CLK. The active edge of DOT CLK is also the active edge of signals that follow 
at lower frequencies or lower rates. UA14 will load synchronously with the 
rising edge of DOT CLK when a load pulse (H COUNT*) Active low is 
indicated by (*). is applied. H COUNT* is generated by decoder UBl (Sche- 
matic, Sheet 2). UBl Pin 9 will be active during the counts E to F of counter 
UBll which generates H COUNT*. 

The Memory Counter is UD3. During the time H COUNT* is active synchro- 
nous with the rising of the 8 MHz clock. Shift Register UA14 will load new 
data from the video circuitry. The character on the screen is bracketed by the 
H COUNT* pulse which sets an inflexible limit in timing. A horizontal 
display line consists of 64 pulses including video retrace blanking which 
leaves 52 characters visible. Each character time is very nearly 1 microsecond, 
so that the vertical frame rate is in full synchronization with the AC line (60 
cycles). 

At the decoder UBl (Schematic, Sheet 2), there is an active low CHAR CLK* at 
Pin 15. CHAR CLK is inverted by UE12 (Schematic, sheet 8). The other two 




(4 MH3) 



MEMORY 
CLOCK 
(2 MH3) 



L 



CHARACTER 
CLOCK 
(1 MH3) 



L 



Figure 11.4 — Basic System Timing 
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inputs to the decoder are CPU CLK and MEM CLK. CPU CLK is a 4 MHz 
signal that will change synchronous with the low to high transition of DOT 
CLK. MEM CLK and CHAR CLK also have transitions on the rising edge of 
the DOT CLK, (the active times that are decoded for the operation of the 
machine state or the logic timing synchronizing circuits). CARRY is a 62 
nanosecond pulse which is fed to a chain of synchronous counters which are 
clocked with the 62 NSEC clock so that the pulse must be just that long in 
order to allow for one advance. The CARRY output occurs only during the F 
count of counter UBIL 

The address decoder UBl (Schematic, Sheet 2) decodes address lines 13 and 14 
and the added conditions to UE5 of ROM MODE* and address 15. ROM 
MODE* comes from a sequence of flip-flops set by various interrupt condi- 
tions, by a power-on-reset, or by a particular I/O reference. If ROM MODE* is 
active (low), address 15 is low, address 14 is low and address 13 is high 
indicating the second 8K of memory, then one of the UBl outputs (Yl) will be 
active. In the bottom 8K of memory with address 13, 14, and 15 all low, YO will 
be active. This output is ROM CE* (chip enable) which allows ROM access. 

MREQ* is ANDed in UEll with RD* to produce ROM RD*. Note that the 
MREQ* is delayed from the Z80's MREQ* and is not present when a refresh is 
occurring; MREQ* is different from the MREQ* normally associated with a 
Z80. ROM RD* enables the ROM output, therefore, ROM access is developed 
from Chip Enable (address 13, 14, and 15 low together with ROM MODE* 
low) and the ROM Output Enable going active when MREQ* goes active (as 
long as read is present). There is no RAM access under these conditions. 

If ROM MODE* is not active, decoder UBl will not have any output low. If 
ROM MODE* is active, and address 14 or 13 is high (in the ROM MODE but in 
the upper 3/4 of memory), Y2 or Y3 will be low or no output will be low. This 
is the condition for a RAM access. 

If either of the inputs on pins 4 or 5 of UDl is low, pin 6 will be high which 
will prevent a RAM RQ* from being issued from UA4, pin 3. On the other 
hand, if UDl pins 4 and 5 are high, pin 6 will be low permitting a RAM 
request. On an MREQ* signal, a RAM request will be issued. RAM RQ* is 
applied to gate UC2, pin 12 where it will pass thru if the Memory Counter 
UD3 is in a finished condition (low output on pin 11). The Memory Counter 
will lock up in the finished condition because of the UB3 inversion applied to 
UD3 pin 3 which causes the counter not to count. The Memory Counter will 
count up to 8 and stop with QD high. If UD3-QD is locked high, then UD2-8 is 
high which results in a low output (UD2-10) permitting the RAM RQ* to pass 
thru UC2. It will be the OR'd thru UCl and applied as a WAIT* to pin 24 of 
the Z80. This means that if the Memory Counter (UD3) is in the finished state, 
the RAM request will immediately result in a WAIT* request to the CPU. In 
order to leave this state, the other destination of RAM RQ* from UA4-3 must 
be examined. 



74 



CHAPTER ELEVEN THEORY OF OPERATIONS 



The timing conditions at UCl-8 are as follows: 

(1) Count 8 to 9 from counter UBll via decoder UBl 

(2) Condition of UBl-10, count C to D 

(3) Ml* which comes direct from the CPU 

The Ml memory timing sequence from the Z80 is shorter than the non-Ml 
memory sequence. Two possible openings for Ml access are allowed, but only 
one possible opening is allowed for a non-Ml timing sequence. Therefore, 
either Ml and C-D or 8-9 are the possible times RAM request will be gated 
thru UC2-8. The output of UC2-8 is called RAM LOAD* which is applied to 
UDl-12 where it is ORed with C-D from decoder UBl. This means that even if 
a RAM request is not issued, C-D time will cause Memory Counter UD3 to 
load. If the Memory Counter is finished counting, a high active signal is 
applied to UDl-9. Therefore, if a RAM request is not issued on C-D time, 
UDl-9 will cause the Memory Counter to load. UD3 inputs A, B and C 
determine what is loaded into the memory counter. Input D will always load 
to a zero, and the count will start. Bit C indicates no RAM request and the load 
came from C-D of decoder UBl. This will cause a video access cycle of RAM. 
Video timing must allow for video access thru memory and to the Video 
Latch UA18 (Schematic, Sheet 4). The data must be presented to the latch and 
to Character Generator UA15 in time for the propagation delay (415 nano- 
seconds). The video deadline is 450 nanoseconds in advance of the H 
COUNT* load signal to Shift Register UA14 which is the end of the zero 
count state on Video Counter UBl. Video access will count from 4 to 8 in the 
Memory Counter. QC will be high and remain high until the count reaches 8. 
Active low constitutes CPU access. UD3-13 starts at zero and will remain zero 
for the first count based on the 125 nanosecond dot clock. It will go high for 
two counts, then it will go low as CPU time changes low. At that point, QD 
will go high and a finished condition will exist. 



11.5 ROM (Read Only Memory) 



The ROM (See Figure 11.5) is a device with information pre- written into its 
memory slots. The contents of the ROM within the Osborne 1 cannot be 
changed. There are 12 address inputs and 8 data outputs, which means that 
the ROM has a capacity of 4 kilobytes. 

The ROM has tri-state outputs. When pin 20 (Output Enable*, or OE*) is high, 
the output pins present a high impedance to the data bus lines, permitting 
other devices to use the lines when ROM is not in use. When pin 20 is high, 
no information is put on the data bus by the ROM and the address lines have 
no effect. When pin 20 is low, the data stored in the ROM is connected to the 
data bus, and the bus will see whatever is stored in the location being 
addressed at that time. 
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Figure 11.5 — ROM Pinout 

Operation of the ROM (Schematic, Sheets 2 and 5) is basically controlled by 
pin 18 (Chip Enable) and pin 20 (Output Enable). ROM CE* (Chip Enable) 
and ROM RD* (read) are applied to pins 18 and 20 respectively. ROM CE* and 
ROM RD* are generated as briefly described below. A detailed discussion is 
provided under the Timing Function. 

ROM CE*: ROM CE* is generated by 2-to-4 line decoder UBl which is 
under control of ADR 13, 14, and 15 and ROM MODE*. Address lines 13 thru 
15 are used by the CPU to select the ROM chip rather than another device on 
the bus. The ROM MODE* signal is available to ensure no bus conflict will 
occur when ROM data is using the bus (UA4 and UBl act in concert to ensure 
that RAM and ROM cannot be selected simultaneously. 

ROM RD*: ROM RD* (which is active low) is generated by UEll which 
allows the ROM (UDll) to access the bus via its tri-state outputs only after 
causing the RAM to wait. 
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11.6 RAM (Random Access Memory) 



The RAM is a dynamic 64K by 8 bit memory. It is physically structured as a 
4X8 matrix (UA20 thru 27, UB20 thru 27, UC20 thru 27, and UD20 thru 27) of 
integrated circuits (IC), each IC being a 16K by 1 bit RAM. This arrangement 
results in a 64K by 8 bit memory. 



11.6.1 Address Lines 



Fourteen address lines are required to specify 1 of 16,348 memory cells. Since 
the RAM ICs have 7 address inputs, addresses are strobed into the chip seven 
bits at a time. To read from the RAM, seven row address bits are set up on 
input addresses AO through A6, then latched into the chip by a Row Address 
Strobe (RAS*). Then seven column bits are set up on AO through A6 and 
latched in by the Column Address Strobe (CAS*). After both RAS* and CAS* 
are low, the data output of the cells addressed becomes valid. 

11.6.2 RAM Data Output 

The outputs are tri-state. Except during a memory cycle by RAS* and CAS*, 
the outputs present a high impedance to the data lines. 

11.6.3 RAM Refresh Operation 

It is the nature of this type of memory that the stored data will deteriorate 
rapidly; therefore, a refresh operation must be performed by applying a RAS* 
strobe to each row address every 2 milliseconds, or more often. In the Os- 
borne 1 the RAM is refreshed during each video cycle by reading display data 
from the RAM. 

The AO through A6 pins on all the RAM chips are tied together; that is all pins 
5 (AO) are together, all 7 (Al) and so on, so that whatever is on the RAM 
address bus is applied to all 32 chips. Likewise, all the DI (data in) pins are 
paralleled. The DO (data out) pins are also tied together. 

11.6.4 Write Enable Signal WE* 

Write Enable from OR gate UE5 enables data to be put onto the bus. Write 
Enable is a function of the CPU delayed access input at UE5 pin 2 and the RD* 
signal. RAM bus access is also controlled by the tri-state line driver UA19, the 
state of which is controlled by UE5 output pin 11. The output of UE5 is a 
function of READ*, pin 12, and CPU delayed access, pin 13. The generation 
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and access will be discussed as part of the timing function. Addresses are set 
on AO through A6 by the address multiplexers UE15, UE16, UE17, and UE18 
and through buffers UE19. The gate inputs to the buffers are tied low, thus the 
buffer outputs are always enabled. The DO (data out) pins to the RAMs are 
connected to the data bus through the read buffer UA19. This driver is a tri- 
state output device gated by UE5. 

11.6.5 CPU Write Operations 

When RD* and CPU TIME* are low, RAM data outputs are gated out on the 
data lines. When CPU TIME* is high, the RAM is (probably) in a video cycle 
and RAM outputs go to the video circuits. The CPU TIME* and RD* signals 
switch RAM output to the CPU data lines. 

To read a memory cell it is necessary to set up address bits AO through A6 with 
a row address, strobe with RAS*, set up a column address, strobe with CAS*, 
and while the RAS* and CAS* strobes are low, data appears at the outputs. 

11.6.6 Memory Multiplexing 

Memory multiplexing (Schematic, Sheet 4) is done by four ICs, UE15 thru 
UE18. Pins 14 and 2 (SO and SI) switch between CPU and video, and between 
rows and columns, as determined by ACCESS, CPU TIME*, and the 62 NSEC 
clock. The addressing, reading, writing, and strobing the memory with ap- 
propriate delays are a separate function. The paragraphs on timing describe 
the timing and sequence of these signals. 

11.7 CHARACTER GENERATOR 

The character generator EPROM is a part of the video section that performs a 
translation on the character data as it comes out of the RAM, to the data as it is 
displayed on the screen. The data in RAM is generally stored using the ASCII 
code (American Standard Code for Information and Interchange) which is a 
table of 128 bit patterns that relate to typical characters and control characters 
from the keyboard. The Character Generator EPROM is entirely separate 
from the Program ROM and performs a different function. The Character 
Generator EPROM converts the character code in RAM to a pattern of dots for 
the display. 

When a key is pressed on the keyboard, it has to get into the Character 
Generator EPROM, since that is the path it has to take in order to be displayed 
in the screen. When it comes from the keyboard, it is read by the processor 
and temporarily stored in the RAM. The processor reads the RAM to deter- 
mine the next action. It looks through a table in the EPROM that contains the 
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keyboard decoding table. A part of the table information resides in the RAM 
so the user may change the coding of the keys. The numeric keys with the 
control key pressed down result in reference to this table in RAM. 

11.8 I/O SERIAL PORT 

Divider UC3 (Schematic, Sheet 7) is a divide-by-13 counter that operates from 
a 2 or 4 microsecond signal that is obtained from the video counter UA13. This 
works out to a 26 or 52 microsecond clock period. The software registers in 
UC4 chip can be set to divide by 16 or 64 as necessary. This results in a 1200 
baud bit rate or a 300 baud bit rate for the 6850. 

11.9 VIDEO DISPLAY 

There are 52 microseconds for display across the screen divided into 52 
character elements. There are 24 text lines vertically, each line consisting of 10 
elements vertically and 8 horizontal dots; the display matrix is therefore 
8X10 dots. 

The Character Generator outputs an 8-bit element based on the character code 
from RAM and a line scan number (0-3) from UB15 divider that indicates 
which line of the character is being displayed. Every time the retrace returns 
to the beginning and starts a new scan line, the scan counter increments. It 
starts at and resets to after the count of 9. The resultant line of text, has text 
address TXADR. 

In terms of the actual data coming out of memory, there are 24 text lines, and 
Counters UD17 and UD18 count from to 23 (24 lines). There are two text line 
times that are not seen. The 24th and 25th lines occur during the vertical 
retrace. The visible size of the display is 24 lines. Horizontally, Character 
Counters UD15 and UD16 keep track of which character is being displayed at 
a particular location on the screen. The display can be scrolled vertically and 
horizontally in hardware. This means that the starting point of each of those 
lines, horizontal and vertical, can be changed. 

Registers contain the values of the first horizontal count in memory that will 
be accessed, and the value of the first vertical count. Any changing if these 
two reference values will cause the display to appear to move on the screen. 
This action is implemented as part of a large scale integration (LSI) parallel 
interface adapter (PIA) that is a 6821 chip. These reference numbers are 
latched into the PIA from the CPU. 

This indicates that there is a horizontal and vertical set of pointers that can be 
manipulated by manipulating data as presented by the 6821 chip and results 
in changing the positioning of the display screen relative to the RAM 
memory. 
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As previously described, a text lirxe in RAM can go out to a width of 128 
characters. The screen displays only 52 characters at any given moment. The 
portion of the 128 characters to be displayed is determined by the horizontal 
offset. 

11.10 VIDEO SCAN GENERATOR 

The video display timing starts with the horizontal timing signal (CHAR 
CLK) developed by 4-bit Counter UBl-11. CHAR CLK is inverted by UE12 
(CHAR CLK*) and is applied to Decoder UBl. UBl output count of E-F results 
in H COUNT* which is applied to the Scan Generator input at UA13-1. The 
input to UA13-1 is divided down to provide 2, 4, 8 and 16 microsecond 
outputs. The 2 msec and 4 msec outputs are applied to the baud rate generator 
UC3 which is part of the I/O serial port. The 16 microsecond output is applied 
to UA13 where it is further divided down to provide two 64 microsecond 
outputs. One of the 64 microsecond outputs UA13-10 is inverted through 
UE23D and routed to the external monitor connector. This is the horizontal 
sync pulse. The other 64 msec output is inverted by UAll and applied to 
UA12. The flip-flop formed by two sections of UA12 develops the horizontal 
blanking pulse. 

Flip-flop UD14 develops a one character wide pulse. The Q output (UD14-7) 
advances Scan Counter UB15, resets Horizontal Counter UA13, and also 
increments Text Line Counters UD17 and UD18. 

The Q* output (UD14-6) reloads Character Counters UD15 and UD16 with 
the horizontal offset. 

Divider UBl 5 develops the SCAN to 3 signals. The SCAN and SCAN 3 
signals are applied to the inputs of AND gate UB13 that increments the text 
address counters (UB17 and UB18) by one each time scan number nine occurs. 
The audio alarm is enabled by the PBS output of parallel interface adapter 
(PIA) UC15 and is modulated by SCAN 2 (UB15-7). 

The QD output from UB15 (SCAN 3) clocks a line counter formed by UB15 
and UB14. This line counter develops the vertical blanking and sync signals. 

The vertical blanking pulse output from AND gate UBl 3 is also routed to the 
external monitor connector through inverter buffer UE23. Vertical blanking 
is also applied to another section of inverter buffer UE23, mixed with the 
horizontal blanking output from UE23, and applied to gates UE22. The out- 
puts from the two gates (UE22) are inverted by buffer UE23 and applied to the 
CRT video via video contrast control R44. 

Flip-flop UE21 is used to insert the cursor signal and DIM* level via gate UE22 
onto the CRT video line along with the video signal that originates from the 
video display shift register UA14. 
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The outputs of counters UD15 and UD16 (CHADR to 6) and UD17 and 
UD18 (TXADR 0-4) are routed to the RAM address multiplexer circuits. 

11.11 KEYBOARD AND ASSOCIATED 
BUFFERS 

Input to the Osborne 1 is made via the keyboard unit. The keyboard is 
comprised of a series of 69 key switches which connect columns (COL to 7) 
and rows (ROW to 7). 

The keyboard circuitry is an 8X8 matrix with a key switch located at the 
junction of each pair of lines. The circuitry is enabled when ADR 9 line is set 
high, I/O SEL* is set low, and RD* line is also set low. This results in enabling 
UE12 tri-state buffers that transmit the COL through COL 7 levels via the 
data lines (DATA through DATA 7) to the CPU. 

Pressing a key connects the associated ROW and COL lines. The voltage level 
from the ADR line is transferred to the ROW line via Inverter UE13 or UE14. 
The keyswitch passes this level to the COL line, and it is then routed through 
enabled tri-state buffers of UE12 to the data lines to the CPU. 

11.12 DISK DRIVE AND DISK CONTROLLER 

There are two 5-1 /4" Disk Drives provided as an integral part of the Osborne 
1. The two units permit recording and playing back information on single 
sided, single density, soft sectored diskettes and transferring this information 
from or to RAM. 

11.12.1 Disk Drive Controller 

The disk drive controller circuit is a 1793 LSI chip, that provides all the 
necessary control of the two disk drive units (1 and 2). The disk drive control- 
ler (UB7) is a serial interface that is under software control. The 1793 inter- 
faces with the disk drive electronics via buffer interface gates UA8 thru UAIO. 

11.12.2 Disk Drive 

The Osborne 1 contains two disk drive units that store information on a 
floppy disk. Each disk has 40 tracks capable of storing 102K bytes for a total of 
80 tracks (204K bytes) with two drives. The disks when operating rotate at 300 
rpm that results in 200 millisecond period of rotation. The head can move 
across the 40 tracks taking approximately 20 milliseconds per track step time. 
The recorded data is retrieved as a serial data stream. This data is examined by 
the disk controller to decipher which sector is being read. 
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11.12.3 Disk Drive Electronics 

The disk drive electronics board on each drive provides the following 
functions: 

1. Read amplification to amplify signals received from the magnetic 
read heads 

2. Write drive control that is used to drive the recording head 

3. Motor control electronics used to maintain the disk drive motor run- 
ning at a constant speed 

4. Stepper motor control used to activate the stepping motor and move 
the head across the disk to the proper track in response to step 
commands from the disk controller 

5. Track sensors 

6. Write protect that detects if a tab has been placed over a notch in the 
disk envelope prohibiting the ability to write on the disk 

7. Index sensing that senses a hole in the disk to provide an index point 

11.12.4 Disk Format 

The disk track format is such that it provides the writing and reading of 
magnetic flux densities along a disk track. An electrical pulse, applied to a 
write head, will result in polarizing the magnetic particles in the disk at a 
specific spot. During the read process, the spot will cause an electrical read 
pulse to be developed. These pulses when written, will normally occur at 4 
microsecond intervals. 

To be assured that the correct pulse train versus noise is read, the pulse is 
gated with a 4 microsecond clock pulse generated by a counter. In this man- 
ner, noise transient effects will be minimized. 

The index timing pulse occurs once each rotation of the disk. With a disk 
present in the drive assembly and the drive door closed, the index sensor 
optically detects the presence of a disk hole. Only one hole is permitted per 
disk to identify the beginning of sector 1. Disks that contain additional holes 
(hard sectored disks) will not operate correctly in the disk drives. 

To verify a good recording, the information writing operation must be com- 
pleted before the second index pulse occurs. A second index pulse will termi- 
nate the operation and will cause an error indication to occur. The index pulse 
received by the 1793 disk drive controller is a significant indicator of oper- 
ational status. 
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11.13 RESET AND NMI 

Reset and NMI are two signals generated separately that produce similar 
results. 

NMI: Pressing the Reset Switch SI on the front of the Computer will cause 
the non-maskable interrupt (NMI) to be generated from the debounce buffer 
UE20 (Schematic, Sheet 1). The NMI or reset signal causes ROM to be ad- 
dressed (at location zero) as explained later. When Reset switch SI is pressed, 
the following sequence occurs: 

1. NMI is applied to the D input of UB6 and to pin 4 of AND gate UA4 
(Schematic, Sheet 3). 

2. The Ml * output of the CPU is inverted by UB12 and clocks flip-flops 
UB6 and UB4. The Q output of UB6 goes low, and this signal, ANDed 
with switch signal, applies NMI* to the CPU. 

The next Ml* pulse switches the Q output of UB4 low, and the pulse after that 
sets the Q output of UB4 (ROM MODE*) low. The active low Q* output of 
UB4B prevents further clocking of UBl and UB4 via OR gate UB4UA4. 

UDIOB functions as an I/O write cycle decoder. The low active outputs of 
UDIOA perform as follows: 

1. YO clears flip-flop UB4 and ROM MODE* becomes low active. 

2. Yl presets UB4 and ROM MODE* goes high which enables RAM if 
MEM REQ* is low. 

3. Y2 causes BIT 9 to go high. UEIOA serves as a latch so that BIT 9 
remains high until Y3 goes low, setting BIT 9 low. 

Reset: Before the computer power supply is turned on. Capacitor C12 (Sche- 
matic, Sheet 1) is completely discharged. Turning the power supply on results 
in the Capacitor (CI 2) being charged to 5V. This charging does not occur 
instantaneously. The time it takes depends on Resistors Rl, R6 and Capacitor 
CI 2. While C12 is charging, the input to UB3A is in the low state (between 
and 2.0 Volts) and this results in the output of UB3B, which is the reset signal, 
being low. Reset is routed to: 

1. Z80 CPU UCll 

2. The parallel port interface chip UC7 

3. Interface chip UC15 (Figure 5) 

4. Clear input of flip-flop UB4 

The reset signal resets the parallel port interface and the video interface chip. 
The effect of the reset signal on the CPU and on flip-flop UB4 is the same as 
the NMI signal. 



83 



Osborne 1 
Schematics 



12.1 MAIN LOGIC BOARD SCHEMATICS 85 

12.2 DISK ELECTRONICS BOARD SCHEMATICS 105 



12.0 Osborne 1 Schematics 

12.1 MAIN LOGIC BOARD SCHEMATICS 

Following are the schematics for the main logic printed circuit board: 
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1 007 


1 Efl 


IRES, FXD, 1/4W 5% 10K 

1 lyi nnMTTwncn - 


1 R13, R20, R26, R34, R36, 1 


1 








———,-»__——. L_n l^UN 1 X InUCU 





I TITLE: D MULTLYR MftlNbOSIC PCB flSSY 



I OSBORNE COMPUTER CORP. 



ILM# 3010063-06 



IDrawnsKDK I Checked 

I nFfofiHE5~rTRT HF MQTPfrtai R 




iDATE 9/a/ee 



8EByil^^^%g^i^_iECO#i_2!A01_iDater 
— ^— _ _ _ _ 



I Revision H 



IReleased: 
I 



REIEA 



IITEM 


1 PORT NO. 


QTY 


UM 


1 


TITLE 




1 REFERENCE DESISNATORS 


1075 


1 7P5ai04-00 


005 


EPI 


IRES, FXD, 1/4W 


5-/4 


100K 




IR14,R15,R16,R17,R18 


1076 


1 7P52181-00 


001 


Efl 


IRESjFXD, 1/4W 


5% 


180 OHM 




IR24 


\Qfn 


1 7P522S0-00 


002 


Eft 


IRES, FXD, 1/4W 


5'/ 


22 OHM 




IRS, R21 


1078 


1 7P52221-00 


002 


Eft 


IRES, FXD, 1/4W 


5"/C 


220 OHM 




1 Ra, R40 


1079 


1 7P52222-00 


003 


Eft 


IRES, FXD, 1/4W 


554 


2. 2K 




1 R22, R23, R33 


1080 


1 7P52223-00 


001 


Eft 


IRES, FXD, 1/4W 


55C 


22K 




IRl 


1081 


1 7P52330-00 


001 


Eft 


IRES, FXD, 1/4W 


5->i 


33 OHM 




IR7 


1082 


1 7P52331-00 


003 


Eft 


IRES, FXD, 1/4W 


S"X 


330 OHM 




IRg, R10, R12 


1083 


1 7P52332-00 


002 


Eft 


IRES, FXD, 1/4W 


^% 


3. 3K 




1 R29, R42 


1084 


1 7P52470-00 


001 


Eft 


1RES,FXD, 1/4W 


554 


47 OHM 




IR41 


1085 


1 7P52471-00 


002 


Eft 


IRES, FXD, 1/4W 


554 


470 OHM 




1 R6, R4 


1086 


1 7P52472-00 


001 


Eft 


IRES, FXD, 1/4W 


554 


4.7K 




IR19 


1087 


1 7P52473-00 


004 


Eft 


IRES, FXD, 1/4W 


554 


47K 




IR11,R25, R27,R2a 


1088 


1 7P6 1106-00 


001 


Eft 


1 SWITCH, DPDT, MOMENTARY, fiCTION 


ISl 


1089 


1 7 P6 1103-00 


001 


Eft 


i SWITCH BUTTON 






1 tSl) 


1090 


1 7P63000-00 


004 


Eft 


1 CONN, SHUNT, 2 


PIN 




1 (Jl), (J3), (J4), (J5) 


1091 


1 7 P64 125-00 


001 


Eft 


1 CONN, PC MT, RT fiNGL, DB 25S 




IP2 


1092 


1 7P64209-00 


002 


Eft 


1 CONN, PC MT, RT ftNBL, DE 9P 




IP1,P6 


1093 


1 7 P64 102-00 


002 


Eft 


IHDR, PC MT, STR, 100ML SIL 2 


PIN 


Ul, J3 


1094 


! 7P644 10-00 


001 


Eft 


IHDR, PC MT, STR, .100 SIL 10 


PIN 


!P9 


1095 


1 7P64207-00 


001 


Eft 


IHDR, PC MT, STR, . 


L56 SIL 7 


PIN 


IP7 


1096 


1 7P64406-00 


001 


Eft 


IHDR, PC MT, STR, 


DIL 8 


PIN 


IJ4, J5 


1097 


1 7P64520-00 


001 


Eft 


IHDR, PC MT, RT 


ftNSL DIL 20 


PIN 


IP4 


1098 


1 7P64534-00 


001 


Eft 


IHDR, PC MT,RT 


ftNBL, DIL 34 


PIN 


IP8 


1099 


1 7P65124-00 


002 


Eft 


1 SOCKET LOW PROFILE, DIP £4 


PIN 


IPftlS, PDll 


1 100 

1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


1 7P65 140-00 

1 

1 

1 
1 
1 
1 
1 
1 
1 
1 
1 
! 
1 


002 


Eft 

1 
1 


1 SOCKET LOW PROFILE, DIP 40 

i 

1 

t 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 


PIN 


1PB7, PCll 

1 

1 

1 
1 

1 
1 
1 

1 
1 
1 
1 
1 
1 



-END OF LM- 
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i 



lfl03004 



'5L 



D7 i 



P2 



28^ 



29^ 



TACH 



-\Afyr- 

R36 



TflCL 



P2 



PI 



10< 



12^ 



DSO 



DSl 



PI 



^ 




RN3 



; R34 



C28 



+ 5L 



U18 



:R27 



J^ 



R33 



*12M 



tr 



+ 5L 

okif 

1 1' '3^ 



C20 



R44 



»5L 



R23 



>l v\A • — — 



R24 



TR 



4 R26< 

3 



TH CV 

D IS 



R32 Ul 



^ i ±:C5 ^"^ -^ 



^5L 



-AAA^ »- 

R43 



03 



P2 



MOTH 



V 



C27 



C36=;= 

•- 



MOTL 



^ 



R25 
C21 



...0 ^- 



UlE 



3E> 



U20 






2 U18 



R42 



^ 



+ 5L- 



_r--78__ALA 
-HVW-I— 



R38: 



R41 



^ 



RN8 



D2 



? 



13 



Ul 



^t>iU 




E> 



: RN! t5L 
[ 5r---i I "i'" 



U8 



RN5 



** ^U8 



6 flLC 



^31 



■>30 



>4 



>5 



P2 



SEL 



SEL 



■*- SH2. 83 
SH3, Al 

■*- SH3. B4 



W2L- 

M2M- — ♦ 

1 
'•12R- — •- 



C34 



T 



h>ll, 13, 15. 17 



w ^ 



t ? — *- 



C6. 9. 13, 
^ 19, 25.26, 
T 30-32 



+ 5L-— ♦ i- 

j 
*5R- — '' 



-i->l,3, 5, 7. 9, 19 



->27, 29.31.33 



C33: 



h>21.23,25 



C35 



PI 
P2 

» "^^!> 32 



P2 



R35 



g.aastfl 



HaEAStPX 



rco #0090 



ECO #0207 



2782 
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INTEGRATED CIRCUIT IDENTIFICATION TABLE | 


REFERENCE 
DESIGNATION 


TYPE 


GND 
L 


GND 
M 


GND 

R 


*5L 


♦ 5M 


*12L 


tl2M 


*12R 


Ul 


CA3054 






5 












U2 


4025B 


7 






14 










U3,4, 10 


555 


1 






8 










U5 


311 


1. 4 










8 






U6 


NE592 






5 










10 


U7 


40I3B 


7 






14 










U8 


LS86 


7 






14 










U9 


LS112 


8 






16 










Ull 


LSI23 


8 






16 










U12 


7438 


7 






14 










U13 


4070B 


7 






14 










U14 


400 IB 


7 






14 










U15 


LSI 39 


8 






16 










U16 


TL091 




4 










7 




U17, 19 


LS14 


7 






14 










U18 


LSI 32 


7 






14 










U20 


4023B 


7 






14 










U21. 22 


7545! 




4 






3 





























COMPONENT REF OESIG I 


LAST 


NOT USED 


C38 


C17 


06 


- 


L5 


- 


P3 


- 


Q3 


- 


R39 


R23. 24. 40 


RN8 


RN2 


TP8 


TP2 


U22 


- 


1 
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UM^SS 
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T 
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IA03004 
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mm Am«ovco 



I X L I 

IS RNl SI 
I 



'•21- 



P2 

MSI ! 



: 5. SMS I i ^ 4 j4 



CIS ♦SL 



I I li 

• HVWH 



+ 5L 

A I I 



PI 



RN3 



I 



20 <■ 



18^ 



STEP ^ 






*5L 
'<' 

LXJ 

5 



1 ' HVW+^ — « 

I I L 

RNl 



TR 



TH CV 
3 iS 



RN4 



C17^ CIS 

•- 



A 4^ 

RN3 ||} 

DIR Sl 5 



U17 



PI 
P2 



<^ 



*5L 

I 1 

f+i 

[ > I c 



RN5 



RN8 



*5L 



10 -f 



TZLA! 




7«— -■ 1 

r+T TZP +5L 

|RI\16 



RN5 

ir 12 



i > I' 

LXJ 



2 ^ 



TZP 



12 f 

3 <- 

11<- 

6 ^ 



TZTC 



TZP +5L tYAWH II 

T 



L J 



U19 



TZN 



-aA,^>i-i^i^»i^ 



U19 



V 



U20 



SH3. B3 — 



WG 



+ 5L 



rii>ic>-' 



TZN 



RN7 



TZLC 



TZTE 



I LA r 11 ^, \l7 



INDEX 

TPS 



SH1>C2 



SEL 



8 ^ 



6l J r+T 

RN8 |||RN6 

l+J U19 

I TO . ^IL-T^s^G 



H>^ 



6' '5 



U19 



RN7 



0-il> 



U14 



m>^ 



PHC2 



♦5L-^ 



i3,J !L. 



11 



» ' q>CLK 
1 12 



U8 



iil 



PR 
J Q 



K Q 

CLR 



vr, 



U9 



U15 



:0 



1 



— • 

ii_U9 

PR 



C>CLK 



K Q 

CLR 



G YO 

Tlt> 
A Y2 > 
B Y3 > 



► 12M- 



PHCl 



PHON 
TP3 

T 



U22 



D6 



15, 



15 



"SL 



14 



13 



G TO 



Tl > 
A Y2 > 

B Y3 > 



,11 



UlS 



I> 



D3 



^J_J^ 



U21 



D5 



Tl> 



, = I 

U22 04 



X> 



R39 



PHI 



PH4 



PH2 



PH3 



U21 



RNl 



p-Hvw+-it5L 



MS 2 



GND 



U12 



GND 



U17 



■^ 



[y 



V 



TRKO 



U12 



10 



9 <^ 



14 f 



lie 



[y 



INDEX 



ITE 



WPLA 



fA/vv-i-f — +5L V 



16 f 



I WPTC 



2L__'J Ji 
RN8 r+i 

■ !■ 

2 



RN6 



U19 



U19 



H>^-^^ 



12 



J I 12 

-M-A/wr 



31 1 1 

-^itA^AH tSL 



U12 



RN5 



[> 



WR PROT 



>19 



> 22 
>27 



> 26 



>23 



>25 



>24 



■> 20 
>18 
>21 



> 26 



>8 



> 28 



PI 



WP 



SH3. B4 



RN7 



15 f 
17 f 



WPLC 



WPTE 



P2 



V 



T 



ifCO/<^ BLOOGETT 02JUift2 



APnJCATXMI 
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Ifl03004 



EMTC tf»nOVEO 



.*5L +5L 

A I 1 1 

RN3 ! > ! RN4 I 



12<: 



Z< 



^ 



LlJ LXJ 



WR DATA 






D Q 

>CLK 

Q 



U7 



RN4 



SH2, A3 
SH1,C2 



2 
\<\ 

♦5L 



_WP 11 
SE 




R7 



14 



RI3 



13! 



U17 



r^ 



U2 



^l> 



♦5L 



r-^SUB 



R16 

-AW- 




lUl 



P3 



►5R 



R3 



^L-__i J ^^2 -.C2 



^ 



, EDLY 
DI ^TPl 



*5L 

i 



R21 R22 



RN3 1 1 1 RN4 I 1 1 I 5 .J UL 

WR GATE li^'^T? 



C12 



R 



TR 



TH CV 

PIS 



U3 



R19 



WG 



SH2.C3 



PI 



R30 



R5 ? ? R4 



START 



R6 



ici 



^ 1 



FINISH 



^ 2 



♦SR- 



F 



CT 



^ 3 



SHIELD 



r^ s 



ERASE 



r> 5 



# f — +12R 



;R20 



P3 






Q2 



► 5R 



€ 

UI Tl2 



R15 



R17 



Ql 



LI L3 

rrm . nmn 



M2R 



C4 



/rmXH-TTTTi 

L2 LI 



R37 



C6 



^ 




+ 5L 



R12 



I R29 C23 

*-^v\A — » — I hf 

U13 i ! 15 



30 



31 2 



14 



RX/CX CX 
B Q 



A Q 

CLR 



^ 



+ 5L. 



Ull 



■T, ^RNI \ 



11 



U7 

13 



R28 



>CLK 



no 



U13 



nnao 

R31 1 



R14 



< 



10 



^ 



C37 



llOOnSi 



C24 



10 



E—Er^ 



PI 



RX/CX CX 
B 



A 

CLR 

Y ll . Ull 



U12 



12 ""■ 

33^ 



I 2. l^iS i 



fulsl 



C14 



SH1,C2 



SEL 



1 1 RD DATA ! 



+> 30 



V 
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Itf^yfJ B10BSE77 02JUMi2 
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I 

I ~ " I TITLE DISK ELECTRONICS PCB ftSSY FflB 1 LM# 5fiS301Z!A-iZi(Zi 1 
I OSBORNE COMPUTER CORP. I ■ 

I IDBIi 2!&/£i/ig IBgyisJ oD J- 1 

iDrawni_lLLB IBesydT_I iiCQ«ligiZ_iDEtei I Released: f|[[£^Cr0\ i 

T DETBCHED_LIBI_OF_MB"rERieLS 1 ; 1 1 -- — I 

lilEMl-PRBI-NQi—iQIYl lilLi 1 BiEiBiNQb.DESibNBIQBS.l 

12146 i7P50003-(ZieT00l5RES, VfiRIfiBLE £0K £:iZiTURN! \P.23 ! 

I i i 1 RES, NETWK, SIP S PIN _ i ^ 

ISA? i7P5i(2i0£-00:e"Z!l i 47-iiZi0Ki0-/., * /Si^ BUSSED I RnE . i 

1046 !7P51003-00l00i i 150R, i0"A, 1/£W, BUSSED i R'vS ■ 

i049 I7P51005-001005! 4, 7K, 10%, 1/8U, BUSSED iRNi,4,5 ! 

i050 i7P510i£-00i001 i 33K, 10-/., i /BW, ISOLATED I RN7 i 

iei51 l7P5£M01-00i001 ! RES, C. F. ,5'/i, X/4W 100R ! SI ^ 

105£ i7P5£105-00l001 t l-OM I R35 : 

slZi54 !7P5£153-00I00£! 15K :R7, 13 i 

i055 s 7 P5£ 164-00: 001: 1&0K : R££ 

:e!5& :7P5££03-00:001 i £0K :Hl£e 

[057 17P5£££0-00l00i i ■ ££R I R33 : 

ieSB 17P5££7£-00I00£1 £• 7K iR10, 11 i 

1055 !7P5££73-00i001 i £70K I Sj£ ! 

1060 i7P5£33£-00i001 i f • 3K : R£ ■ 

1061 i7P5£335-00i001 ' -i- -i^i 1^33 

i06£ i7P5£393-00l001 i 39K i R£9 _ ' 

1063 i7P5£47£-00;0i0; -^t. 7K i R4, 5, 6, 9, £0, £6, £7, 3i , ^;4. 

1 ! ! I i ^- ,' , j..e 

1064 i7P5£514-00l001 : 510K !,^£i 

1065 i7P5£68£-00i001 i 6. Bk i R36 : 
!066 :7P5£751-00i001 i 750T- iHlS i 
1069 I7P5£8£1-00I0031 B£0r ;R1£,£5,3B : 
1071 i7P53560-00i00i :RES, C. F. 5"/., i/£U; 5£r i R19 : 
!07£ ;7P57153-00!001 IRES, !^:. F. £•/-,: /4W i5K i R4£ i 

1073 i7P53££3-00l003 1 ££K !-<£4,/il,44 : 

1074 17P5733i-00!005i 330r ! R£, 3, 14, 16, 30 
i075 l7P5747£-00i00£! 4. 7K i Rl5, 17 

1076 17P53S1£-00!001 I 9. IK ;R4j i 

1077 !7P6410fi-00i001 ICONN BPIN STR, TIN ITPl : 

1078 !7P64316-00!00£! 16PIN RT fiNBL, TIN i P£ i 

1079 i7P64906-00i001 1 6PIN RT PNGi., SOLD ! P3 i 

1080 17P65£01-00l00i iSOCKET, IC, SIP, SPIN i(RN3) ; 

1084 i7P70041-00l00i IRIVET, . l£5"DIft X , 0g3"THK 1 ! 

1085 I7P73001-00!001 IHEftTSINK I • 
I0S7 i Ift03004-00I000IDISK ELEC. PCB SCHEhl REV J : 

1068 I3P04001-001001 tDISK ELEC. PCB FOB Ri^V D i i 

! I 1 I • ' 



-END OF LK- 



i ! TITLE DISK ELECTRONICS PCB fiSBY FAB 1 LMS 3^03004-00 I 

■ ! DBBORNE COMPUTER CORP, 1 : i 

i iDSIi_^,s|ii;ZSg/B£' IRgyis iori J_. i 

lSL-§wniLLB_lCheckSA_i9D2ydi:^^%:::l lECDti0£i7_lDstei^v5;|^Re leased : I'Rpmie'r'rN ~T 

l__DEieCHED_LISI_OF_iv;9TERIfi2l i_ ^___i ^■---___!lL i 

liIEMI_PBRI_NQ^_lQIYi __I_lIlLE i RiEiBEScE_DESIGNfiTDRS_l 

1001 ! 7P1 1014-00! 002 i IC, TTL SN74LS14N iUl?, 19 ■ 

i 00£' 1 7Pi 1086-00 1 001 i SI\'74LSe6N : UB ; 

1003 i7Pll 11 £-00 1001 ! SN74LS11£N I US 

i «04 t7Pi 1 123-00 1001 i SN74LBi£3N iUli 

; 005 i 7P11 13£-00i001 i SN74LB132N iUlS 

1 00& 1 7P1 11 39-00 1001 1 B\'74LB139!V iU15 

!007 1 7Pi 1600-001 001 ; SN7438|\i iUl£ ; 

1006 i7Pl 1801-00 1002; SN75451BP i£l,££ j 

:009 i7PllB0£-00!00; : IC, Ch-iOB CD4001EE iU14 i 

1010 17P1 1803-00! 001 : CD4013BE i U7 

:0il 1 7P1 1604-00; 001 i CD40£3BE ; U20 

:01£ i 7P1 1805-00! 001 i CD4025EE ! u£ 

i013 i 7Pi 1807-00! 001 i CD4070BE !Ui5 i 

:0l5 i7P£1004-00i00^ i IC, LINEPiR TL09iCP :U16 

I CIS i 7P1 1820-00 I 003 i IC, LIMERR Livl555C!\i iU3, 4,10 

i017 l7P20001-00l00i . L!^31lN ■ U5 

leie I7P20002-001001 ! CP13054 :Ui ! 

1019 17P£0003-00l00i : l\E592N ! U6 

i 022 I 7P3000i-00 1004 i DIODE l!^J400i i D3-6 

1023 !7P30004-00i003; lN4i4e iDl,£. 7 

;0£5 !7P30007-00i00£;TRfiMSI&TORS 2N3904 IDi,£ : 

iS£6 i7P3000e-00i00i : TIP! 10 ids' 

1028 i7P40101-00 1003 1 INDUCTORS 150uh +-10% i L3-5 

■029 i7P4010£-001002: 560uH +-10% i:_l,2 ; 

i03i :7P45503-00!001 JCflP, Tfi:N;TL.UI>^ . 35u!^ +-20%, 6V i C£7 

i 03£ i 7P45504-00 1001 i 2. 2uF +-10%, 6V ;C17 I 

1033 !7P45604-00i0Ol iCP!P,fl^U'>^ LO PROFILE 22uF, l&V 1 C34 

1054 i7P45605-00i001 i 4, 7uF i C36 ■ 

1035 l7P45606-00i002i 47liF, 10V I C£, 33 

•: 036 I 7P45&09-00i001 iCflP, M'V^PiR 6BNF +-20% I C21 

;037 l7P46i00-00 1020iCPlP, CER, PlXIfiLi0NF +60-20% ; C3, 5, 6-9, 1 1 , 13-16, 16, 19. 22, : 

i i i i I C25, 26, 30-52, 35 ; 

1038 l7P4610i-00!002 iCfiP, CER, ftXIflL. 100PF+- 5% !C23,24' ; 

i 040 i 7P46105-001001 ' 10NF +-20% ! C£9. 

!041 i7P4615£-00;004; 1 . 5NF +10% i C10, 1£, £0, £6 I 

J 04£ i 7P46330-00i 00£ ! 35PF+-^5% iCl,57 i 

1045 i7P46551-00 1001 i 530PF+-10% i C4 ! 

!044 !7P4E504-00!00i i i00N:F +80-20% ; C3B I 

i I i I ! i 

I i i : I I 

III! I ! 



-L!^ CONTINUED- 



Appendix A 

Z80 Instruction Set 



Presented here is the Z80A instruction set: 

Z80 Instruction Set 
Register Layout: 

Main Register Set 



Alternate Registers 



Accumulator 


Flags 


B 


C 


D 


E 


H 


L 



Accumulator' 


Flags' 


B' 


C 


D' 


E' 


H' 


L' 



interrupt vector I 



memory refresh R 



index register IX 



index register lY 



stack pointer SP 



program counter PC 



nnnn 


= hexadecimal 16-bit value 


nn 


= hexadecimal 8-bit value 


dd 


— 8-bit signed displacment 


r 


= register 


b 


= single bit 
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Z80 instruction 8080 instruction description 



ADC A,(HL) 


ADC M 


ADC A,(IX + dd) 


none 


ADC A,(IY + dd) 


none 


ADC A,r 


ADCr 


ADC A,nn 


ADI nn 


ADC HL,BC 


none 


ADC HL,DE 


none 


ADC HL,HL 


none 


ADC HL,SP 


none 


ADD A,(HL) 


ADDM 


ADD A,(IX+dd) 


none 


ADD A (lY+dd) 


none 


ADD A,r 


ADD r 


ADD A,nn 


ADI nn 


ADD HL,BC 


DAD B 


ADD HL,DE 


DAD D 


ADD HL,HL 


DADH 


ADD HL,SP 


DAD SP 


ADD IX,BC 


none 


ADD IX,DE 


none 


ADD IX,IX 


none 


ADD IX,SP 


none 


ADD IY,BC 


none 


ADD IY,DE 


none 


ADD IY,IY 


none 


ADD IY,SP 


none 


AND (HL) 


ANAM 


AND (IX+dd) 


none 


AND (lY+dd) 


none 


AND r 


ANA r 


AND nn 


ANI nn 


BIT b,(HL) 


none 


BIT b,(IX + dd) 


none 


BIT b,(IY + dd) 


none 


BIT b,r 


none 


CALL nnnn 


CALL nnnn 


CALL Cnnnn 


CC nnnn 


CALL M,nnnn 


CM nnnn 


CALL NCnnnn 


CNC nnnn 


CALL NZ,nnnn 


CNZ nnnn 


CALL P,nnnn 


CP nnnn 


CALL PE,nnnn 


CPE nnnn 


CALL PO,nnnn 


CPO nnnn 


CALL Z,nnnn 


CZ nnnn 


CCF 


CMC 


CP (HL) 


CMP M 


CP (IX + dd) 


none 


CP (lY + dd) 


none 


CPr 


CMP r 


CP nn 


CPI nn 


CPD 


none 



adds byte at HL to A 

adds byte indexed by X to A 

adds byte indexed by Y to A 

adds value in register to A 

adds value to A 

adds BC to HL 

adds DE to HL 

doubles HL 

adds stack pointer to HL 

adds byte at HL to A 

adds byte indexed by X to A 

adds byte indexed by Y to A 

adds value in regsiter to A 

adds value to A 

adds BC to HL 

adds DE to HL 

doubles HL 

adds stack pointer to HL 

adds BC to X index 

adds DE to X index 

doubles X index 

adds stack pointer to X index 

adds BC to Y index 

adds DE to Y index 

doubles Y index 

adds stack pointer to Y index 

logical AND with byte and A 

logical AND with index and A 

logical AND with index and A 

logical AND with register and A 

logical AND with value and A 

test bit of byte at HL 

test bit of byte at index X 

test bit of byte at index Y 

test bit of regsiter value 

subroutine call to location 

subroutine call if carry 

subroutine call if sign 

subroutine call if carry reset 

subroutine call if zero reset 

subroutine call if sign reset 

subroutine call if parity 

subroutine call if parity reset 

subroutine call if zero 

complement carry flag 

compare byte at HL to A 

compare byte at X index to A 

compare byte at Y index to A 

compare register value to A 

compare value to A 

compare byte at HL and decrement BC 
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Z80 instruction 8080 instruction description 



CPDR 



CPI 


none 


CPIR 


none 


CPL 


CMA 


DAA 


DAA 


DEC (HL) 


DCR M 


DEC (IX + dd) 


none 


DEC (lY + dd) 


none 


DECr 


DCRr 


DEC BC 


DCX B 


DECDE 


DCXD 


DECHL 


DCX H 


DECSP 


DCXSP 


DECIX 


none 


DECIY 


none 


DI 


DI 


DJNZ dd 


none 


EI 


EI 


EX (SP),HL 


XTHL 


EX (SP),IX 


none 


EX (SP),IY 


none 


EX AF,AF 


none 


EX DE,HL 


XCHG 


EXX 


none 


HALT 


HLT 


IM 


none 


IM 1 


none 


IM 2 


none 


IN r,(C) 


none 


IN A,(nn) 


IN nn 


INC (HL) 


INRM 


INC (IX + dd) 


none 


INC (lY + dd) 


none 


INCr 


INRr 


INC BE 


INXB 


INCDE 


INXD 


INCHL 


INXH 


INCSP 


INXSP 


INC IX 


none 


INC lY 


none 


IND 


none 


INDR 


none 


INI 


none 


INIR 


none 


JP (HL) 


PCHL 


JP (IX) 


none 



compare byte at HL, decrement and 
repeat 

compare byte at HL, increment BC 

compare byte at HL, increment and 
repeat 

complement A 

decimal adjust A 

decrement byte at HL 

decrement byte at index X 

decrement byte at index Y 

decrement register 

decrement BC 

decrement DE 

decrement HL 

decrement stack pointer 

decrement X index 

decrement Y index 

disable interrupts 

decrement B and jump relative 

enable interrupts 

exchange stack pointer with HL 

exchange stack pointer with X index 

exchange stack pointer with Y index 

exchange AF register sets 

exchange DE and HL 

exchange BC,DE,HL register sets 

suspend operation 

set interrupt mode 

set interrupt mode 1 

set interrupt mode 2 

input byte from C port to register 

input byte from por to A 

increment byte at HL 

increment byte at X index 

increment byte at Y index 

increment byte in register 

increment BC 

increment DE 

increment HL 

increment stack pointer 

increment X index 

increment Y index 

input from C port to HL byte, decre- 
ment B, increment HL 

input from C port to HL byte, decre- 
ment B, increment HL, repeat 

input from C port to HL byte, decre- 
ment B, decrement HL 

input from C port to HL byte, decre- 
ment B, decrement HL, repeat 

copy HL to PC then jump to it 

copy X index to PC then jump 
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Z80 instruction 8080 instruction description 



JP (lY) 
JP nnnn 
JP Cnnnn 
JP M,nnnn 
JP NCnnnn 
JP NZ,nnnn 
JP P,nnnn 
JP PE,nnnn 
JP PO,nnnn 
JP Z,nnnn 
JRdd 
JR C,dd 
JR NCdd 
JR NZ,dd 
JR Z,dd 
LD (BC),A 
LD (DE),A 
LD (HL),r 
LD (HL),nn 
LD (IX + dd),r 
LD (IX + dd),nn 
LD (IY+dd),r 
LD (IY+dd),nn 
LD (nnnn),A 
LD (nnnn),BC 
LD (nnnn),DE 
LD (nnnn),HL 
LD (nnnn),IX 
LD (nnnn),IY 
LD (nnnn),SP 

LD A,(BC) 
LD A,(DE) 
LD A,I 
LD A,R 
LD LA 
LD RA 
LD r,(HL) 
LD r,(IX+dd) 
LD r,(IY+dd) 
LD r,r 
LD r,nn 
LD A,(nnnn) 
LD BC,(nnnn) 
LD DE,(nnnn) 
LD HL,(nnnn) 
LD BCnnnn 
LD DE,nnnn 
LD HL,nnnn 
LD SP,nnnn 
LD IX,nnnn 
LD IY,nnnn 
LD IX,(nnnn) 



location 
location 
location 
location 



none copy Y index to PC then jump 

JMP nnnn jump to location 

JC nnnn jump if carry 

JM nnnn jump if sign 

JNC nnnn jump if no carry 

JNZ nnnn jump if not zero 

JP nnnn jump if sign reset 

JPE nnnn jump if parity 

JPO nnnn jump if parity reset 

JZ nnnn jump if zero 

none jump relative using value 

none jump relative if carry 

none jump relative if no carry 

none jump relative if not zero 

none jump relative if zero 

STAX B move A to byte at BC 

STAX D move A to byte at DE 

MOV M,r move byte in register to byte at HL 

MVI M,nn move value to byte at HL 

none move byte into byte at indexed 

none move byte into byte at indexed 

none move byte into byte at indexed 

none move byte into byte at indexed 

STA nnnn move A to location 

none move BC to location and location + 1 

none move DE to location and location + 1 

SHLD nnnn move HL to location and location + 1 

none move IX to location and location + 1 

none move lY to location and location + 1 

none move stack pointer to location and 

cation + 1 

LDAX B move byte at BC to A 

LDAX D move byte at DE to A 

none move interrupt vector register to A 

none move memory refresh register to A 

none move A to interrupt vector register 

none move A to memory refresh register 

MOV r,M move byte at HL to register 

none move byte at IX to register 

none move byte at lY to register 

MOV r,r move byte from register to register 

MVI r,nn move value to register 

LDA nnnn load A from location 

none load BC from locations 

none load DE from locations 

LHLD nnnn load HL from locations 

LXI B,nnnn load BC with value 

LXI D,nnnn load DE with value 

LXI H,nnnn load HL with value 

LXI SP,nnnn load stack pointer with value 

none load IX with value 

none load lY with value 

none load IX from locations 



lo- 



ne 



APPENDIX A Z80 INSTRUCTION SET 



Z80 instruction 8080 instruction description 



LD IY,(nnnn) 


none 


load lY from locations 


LD SP,(nnnn) 


none 


load stack pointer from locations 


LD SP,HL 


SPHL 


load stack pointer from HL 


LD SP,IX 


none 


load stack pointer from IX 


LD SPIY 


none 


load stack pointer from lY 


LDD 


none 


move byte at HL to DE location, 
ment BC, decrement HL 
and DE 


LDDR 


none 


move byte at HL to DE location, 
ment BC, decrement HL 
and DE, repeat 


LDI 


none 


move byte at HL to DE location, 
ment BC, increment HL 
and DE 


LDIR 


none 


move byte at HL to DE location, 
ment BC, increment HL 
and DE, repeat 


NEG 


none 


two's complement of A 


NOP 


NOP 


no operation 


OR (HL) 


ORA M 


logical OR of A and byte at HL 


OR (IX+dd) 


none 


logical OR of A and byte at IX 


OR (lY+dd) 


none 


logical OR of A and byte at lY 


ORr 


ORAr 


logical OR of A and register 


OR nn 


ORI nn 


logical OR of A and value 


OTDR 


none 


output byte at HL to port C, 

decrement B, decrement HL, 
repeat 


OTIR 


none 


output byte at HL to port C, 

decrement B, increment HL, 
repeat 


OUT (C),r 


none 


output byte in register to port C 


OUT (nn),A 


OUTnn 


output value to port A 


OUTD 


none 


output byte from HL to port C, 
decrement B, decrement HL 


OUTI 


none 


output byte from HL to port C, 
decrement B, increment HL 


POPAF 


POP PSW 


restore AF from stack 


POP BC 


POP B 


restore BC from stack 


POPDE 


POPD 


restore DE from stack 


POP HL 


POPH 


restore HL from stack 


POP IX 


none 


restore IX from stack 


POP lY 


none 


restore lY from stack 


PUSH AF 


PUSH PSW 


store AF on stack 


PUSH BC 


PUSHB 


store BC on stack 


PUSH DE 


PUSH D 


store DE on stack 


PUSH HL 


PUSH H 


store HL on stack 


PUSH IX 


none 


store IX on stack 


PUSH lY 


none 


store lY on stack 


RES b,(IX + dd) 


none 


reset bit in byte at IX 


RES b,(IY + dd) 


none 


reset bit in byte at lY 


RES b,r 


none 


reset bit in register 


RET 


RET 


return from subroutine 



decre- 



decre- 



decre- 



decre- 
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Z80 instruction 8080 instruction description 



RETC 


RC 


RETM 


RM 


RETNC 


RNC 


RETNZ 


RNZ 


RETP 


RP 


RET PE 


RPE 


RETPO 


RPO 


RET Z 


RZ 


RETI 


none 


RETN 


none 


RL (HL) 


none 


RL (IX+dd) 


none 


RL (lY+dd) 


none 


RL r 


none 


RLA 


RAL 


RLC (HL) 


none 


RLC (IX + dd) 


none 


RLC (lY + dd) 


none 


RLC r 


none 


RLCA 


RLC 


RLD 


none 


RR (HL) 


none 


RR (IX + dd) 


none 


RR (lY+dd) 


none 


RR r 


none 


RRA 


RAR 


RRC (HL) 


none 


RRC (IX+dd) 


none 


RRC (lY + dd) 


none 


RRC r 


none 


RRCA 


RRC 


RRD 


none 


RST OOh 


RST 


RST 08h 


RST 1 


RST lOh 


RST 2 


RST 18h 


RST 3 


RST 20h 


RST 4 


RST 28h 


RST 5 


RST 30h 


RST 6 


RST 38h 


RST 7 


SBC A,(HL) 


SBB M 


SBC A,(IX + dd) 


none 


SBC A,(IY+dd) 


none 


SBC A,r 


SBBr 


SBC A,nn 


SBI nn 


SBC HL,BC 


none 


SBC HL,DE 


none 


SBC HL,HL 


none 


SBC HL,SP 


none 


SCF 


STC 


SET b,(HL) 


none 


SET b,(IX + dd) 


none 


SET b,(IY+dd) 


none 



return if carry 

return if sign 

return if no carry 

return if not zero 

return if sign reset 

return if parity 

return if parity reset 

return if zero 

return from maskable interrupt 

return from nonmaskable interrupt 

rotate byte at HL left with carry 

rotate byte at IX left with carry 

rotate byte at lY left with carry 

rotate byte in register left with carry 

rotate byte in A left with carry 

rotate byte at HL circularly left 

rotate byte at IX circularly left 

rotate byte at lY circularly left 

rotate byte in register circularly left 

rotate byte in A circularly left 

rotate 12 bits n HL 4 bits at time left 

rotate byte at HL right with carry 

rotate byte at IX right with carry 

rotate byte at lY right with carry 

rotate byte in register right with carry 

rotate accumulator right 

rotate byte in HL circularly right 

rotate byte in IX circularly right 

rotate byte in lY circularly right 

rotate byte in register circularly right 

rotate byte in A circularly right 

rotate 12 bits in HL 4 bits at time right 

first restart location 

second restart location 

third restart location 

fourth restart location 

fifth restart location 

sixth restart location 

seventh restart location 

eighth restart location 

subtract byte at HL from A 

subtract byte at IX from A 

subtract byte at lY from A 

subtract byte in register from A 

subtract value from A 

subtract BC from HL 

subtract DE from HL 

subtract HL from HL 

subtract SP from HL 

set carry flag 

set big in byte at HL 

set bit in byte at IX 

set bit in byte at lY 
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Z80 instruction 8080 instruction description 



SET b,r 


none 


SLA (HL) 


none 


SLA (IX+dd) 


none 


SLA (lY+dd) 


none 


SLA r 


none 


SRA (HL) 


none 


SRA (IX + dd) 


none 


SRA (lY + dd) 


none 


SRA r 


none 


SRL (HL) 


none 


SRL (IX + dd) 


none 


SRL (lY + dd) 


none 


SRL r 


none 


SUB (HL) 


SUB M 


SUB (IX+dd) 


none 


SUB (lY+dd) 


none 


SUBr 


SUB r 


SUB nn 


SUI nn 


XOR (HL) 


XRA M 


XOR (IX + dd) 


none 


XOR (lY + dd) 


none 


XOR r 


XRA r 


XOR nn 


XRI nn 



set bit in byte in register 
arithmetic shift left on byte at HL 
arithmetic shift left on byte at IX 
arithmetic shift left on byte at lY 
arithmetic shift left on byte in register 
arithmetic shift right on byte at HL 
arithmetic shift right on byte at IX 
arithmetic shift right on byte at lY 
arithmetic shift right on byte in register 
logical shift right on byte at HL 
logical shift right on byte at IX 
logical shift right on byte at lY 
logical shift right on byte in register 
subtract byte at HL from A 
subtract byte at IX from A 
subtract byte at lY from A 
subtract byte in register from A 
subtract value from A 
XOR HL register 
XOR IX register 
XOR lY register 
XOR register 
XOR value with A 
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Appendix B 

6821 PIA Registers/ 

Instructions 



The following specifications on the 6821 PIA were furnished in full by 
Motorola, Inc: 
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;M) motorola 

SEMICONDUCTORS 

3501 ED BLUESTEIN BLVD., AUSTIN, TEXAS 78721 



PERIPHERAL INTERFACE ADAPTER (PIA) 

The MC6821 Peripheral Interface Adapter provides the universal 
means of interfacing peripheral equipment to the M6800 family of 
microprocessors. This device is capable of interfacing the MPU to 
peripherals through two 8-bit bidirectional peripheral data buses and 
four control lines. No external logic is required for interfacing to most 
peripheral devices. 

The functional configuration of the PIA is programmed by the MPU 
during system initialization. Each of the peripheral data lines can be pro- 
grammed to act as an input or output, and each of the four con- 
trol/Interrupt lines may be programmed for one of several control 
modes. This allows a high degree of flexibility in the overall operation of 
the interface. 

• 8-Bit Bidirectional Data Bus for Communication with the 
MPU 

• Two Bidirectional 8-Bit Buses for Interface to Peripherals 

• Two Programmable Control Registers 

• Two Programmable Data Direction Registers 

• Four Individually-Controlled Interrupt Input Lines; Two 
Usable as Peripheral Control Outputs 

• Handshake Control Logic for Input and Output Peripheral 
Operation 

• High-Impedance Three-State and Direct Transistor Drive 
Peripheral Lines 

• Program Controlled Interrupt and Interrupt Disable Capability 

• CMOS Drive Capability on Side A Peripheral Lines 

• Two TTL Drive Capability on All A and B Side Buffers 

• TTL-Compatible 

• Static Operation 



MAXIMUM RATINGS 



Characteristics 


Symbol 


Value 


Unit 


Supply Voltage 


vcc 


-0.3 to +7.0 


V 


Input Voltage 


Vin 


-0.3 to +7.0 


V 


Operating Temperature Range 
MC6821, MC68A21, MC68B21 
MC6821C, MC68A21C, MC68B21C 


Ta 


Tl to Th 

to 70 
-40 to +85 


°c 


Storage Temperature Range 


"■^stg 


-55 to +150 


°c 



THERMAL CHARACTERISTICS 



Characteristic 


Symbol 


Value 


Unit 


Thermal Resistance 








Ceramic 
Plastic 


ejA 


50 
100 


"cm 


Cerdip 




60 





This device contains circuitry to protect the Inputs against damage due to high 
static voltages or electric fields; however, it is advised that normal precautions 
be taken to avoid application of any voltage higher than maximum-rated 
voltages to this high-impedance circuit. Reliability of operation is enhanced if 
unused inputs are tied to an appropriate logic voltage (i.e., either Vss or Vcc)- 



MC6821 

(1.0 MHz) 

MC68A21 

(I.SMHZ) 

MC68B21 

(2.0111Hz) 



MOS 

(N-CHANNEL, SILICON-GATE, 
DEPLETION LOAD) 

PERIPHERAL INTERFACE 
ADAPTER 




L SUFFIX 

CERAMIC PACKAGE 
CASE 715 



S SUFFIX 

CERDIP PACKAGE 



CASE 734 



P SUFFIX 

PLASTIC PACKAGE 



CASE 711 




©MOTOROLA INC., 1961 



DS9435-R2 



MC6821»MC68A21»MC68B21 



POWER CONSIDERATIONS 



(1) 



The average chip-junction temperature, Tj, in °C can be obtained from: 

Tj = TA+(PD*ejA) 
Where: 

TA»Ambient Temperature, °C 

fljA"Pacl<age Thermal Resistance, Junction-to-Ambient, °C/W 

PD"P|NT+PP0RT 

PiUjjbIccxVcC. Watts - Chip Internal Power 
PpORT"Port Power Dissipation, Watts — User Determined 
For most applications PpORT'«P|NT and can be neglected. PpoRT may become significant if the device is configured to 
drive Darlington bases or sink LED loads. 
An approximate relationship between Pq and Tj (if PpoRT 's neglected) is: 

Pd=K*(Tj + 273°C) '2) 

Solving equations 1 and 2 for K gives: 

K = Po«(TA + 273°C) + ejA«PD2 '^* 

Where K is a constant pertaining to the particular part. K can be determined from equation 3 by measuring Pq (at equilibrium) 
for a known Ta. Using this value of K the values of Pd and Tj can be obtained by solving equations (1) and (2) iteratively for any 
value of Ta. 



DC ELECTRICAL CHARACTERISTICS (Vcc = 5.0 Vdc ±5%, Vss = 0, Ta = Tl to Th unless otherwise noted). 



Characteristic 


1 


Symbol 


Min 


Typ 1 


Max 1 


Unit 1 


BUS CONTROL INPUTS (R/W, Enable, RESET, RSO, RSI, CSO, 


CSI, CS2) 












Input High Voltage 


V|H 


Vss + 2.0 


— 


vcc 


V 


Input Low Voltage 


V|L 


Vss-0.3 


- 


Vss + 0.8 


V 


Input Leakage Current (Vjn = to 5.25 V) 


tin 


- 


1.0 


2.5 


(.A 


Capacitance (Vin = 0, Ta = 25''C, f=1.0 MHz) 


Cjn 


- 


- 


7.5 


PF 


INTERRUPT OUTPUTS (IROA, IROB) 








Output Low Voltage (lLoad = 3-2 mA) 


Vol 


— 


:— 


Vss + 0.4 


V 


Three-State Output Leakage Current 


lOZ 


- 


110 


10 


(«A 


Capacitance (Vjn = 0, Ta=25">C, f=1.0 MHz) 


Cout 


- 


- 


5.0 


pF 


DATA BUS (D0-D7) 








Input High Voltage 


VlH 


Vss + 2.0 


- 


Vcc 


V 


Input Low Voltage 


V|L 


Vss-0.3 


- 


Vss + 0.8 


V 


Three-State Input Leakage Current (Vjn = 0.4 to 2.4 V) 


iiz 


- 


2.0 


10 


mA 


Output High Voltage (lLoad= -205 (lA) 


VOH 


Vss + 2.4 


- 


— 


V 


Output Low Voltage (Itoad = 1 -6 mA) 


VOL 


- 


— 


Vss + 0.4 


V 


Capacitance (Vin = 0, Ta-25°C, f = 1.0 MHz) 


Cin 


- 


— 


12.5 


pF 


PERIPHERAL BUS (PA0-PA7, PB0-PB7, CA1, CA2, CB1, CB2) 






Input Leakage Current R/W, RESET, RSO, RSI 
(Vin = to 5.25 V) 


CS0,CS1,CS2,CA1, 
CB1, Enable 


lin 


- 


1.0 


2.5 


mA 


Three-State Input Leakage Current (Vjn = 0.4 to 2.4 V) 


PB0-PB7, CB2 


l|Z 


- 


2.0 


10 


^A 


Input High Current (V|h = 2.4 V) 


PA0-PA7, CA2 


l|H 


-200 


-400 


— 


mA 


Darlington Drive Current (Vo= 1 -5 V) 


PB0-PB7. CB2 


lOH 


-1.0 


— 


-10 


mA 


Input Low Current (V|L = 0.4 VI 


PA0-PA7, CA2 


l|L 


— 


-1.3 


-2.4 


mA 


Output High Voltage 
(lLoad=-200pA) PA0-PA7, PB0-PB7, CA2, CB2 
(lLoad= - 10mA) PA0-PA7, CA2 


VOH 


Vss + 2.4 
Vcc-10 


_ 


- 


V 


Output Low Voltage (Itoad = 3-2 mA) 


Vol 


— 


— 


Vss + 0.4 


V 


Capacitance (Vin = 0, Ta=25°C, f=1.0 MHz) 


Cin 


— 


— 


10 


pF 


POWER REQUIREMENTS 




Internal Power Dissipation (Measured at T^ = Tl) 


Pint 


- 


- 


550 


mW 



y 



(g) 



MGTGRGLA Semiconductor Products Inc. 
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BUS TIMING CHARACTERISTICS <See Notes 1 and 2) 



Ident. 
Number 


Characteristic 


Symbol 


MC6821 


MC68A21 


MC68B21 


Unit 


Min 


Max 


Min 


Max 


Min 


Max 


1 


Cycle Time 


^cyc 


1.0 


10 


0.67 


10 


0.5 


10 


CS 


2 


Pulse Width, E Low 


PWel 


430 


- 


280 


- 


210 


- 


ns 


3 


Pulse Width, E High 


PWeh 


450 


- 


280 


- 


220 


- 


ns 


4 


Clock Rise and Fall Time 


tr. tf 


- 


25 


- 


25 


- 


20 


ns 


9 


Address Hold Time 


tAH 


10 


- 


10 


- 


10 


- 


ns 


13 


Address Setup Time Before E 


tAS 


80 


- 


60 


- 


40 


- 


ns 


14 


Chip Select Setup Time Before E 


tcs 


80 


- 


60 


-■ 


40 


- 


ns 


15 


Chip Select Hold Time 


tCH 


10 


- 


10 


- 


10 


- 


ns 


18 


Read Data Hold Time 


tDHR 


20 


50' 


20 


50' 


20 


50' 


ns 


21 


Write Data Hold Time 


tDHW 


10 


- 


10 


- 


10 


- 


ms 


30 


Output Data Delay Time 


tDDR 


- 


290 


- 


180 


- 


150 


ns 


31 


Input Data Setup Time 


<DSW 


165 


- 


80 


- 


60 


- 


ns 



'The data t)us output buffers are no longer sourcing or sinking current by tQHRmax (High Impedance). 

FIGURE 1 - BUS TIMING 



R/W, Address 
(Non-Muxed) 




Notes: 



1. Voltage levels shown are Vl<0.4 V, V, .:-.2.4 V, 'nless otherwise specified. 

2. Measurement points shown are 0.8 V ai 2,0 V, unless otherwise specified. 
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PERIPHERAL TIMING CHARACTERISTICS (Vcc = 5.0 V ±5%, Vss = V, 


Ta=Tl to Th unless othen/i/ise specified 


) 




Characteristic 


Symbol 


MO 821 1 


MC68A21 1 


MC68B21 


Unit 


Reference 
Fig. No. 


MIn 


Max 


Min 


Max 


Min 


Max 


Data Setup Time 


tPDS 


200 


- 


135 


- 


100 


- 


ns 


6 


Data Hold Time 


tPDH 





- 





- 





- 


ns 


6 


Delay Time, Enable Negative Transition to CA2 Negative Transition 


tCA2 


- 


1.0 


- 


0.670 


- 


0.500 


vs. 


3,7, 8 


Delay Time, Enable Negative Transition to CA2 Positive Transition 


Trsi 


- 


1.0 


- 


0.670 


- 


0.500 


us 


3,7 


Rise and Fall Times for CA1 and CA2 Input Signals 


tr, tf 


- 


1.0 


- 


1.0 


- 


1.0 


liS 


8 


Delay Time from CA1 Active Transition to CA2 Positive Transition 


tRS2 


- 


2.0 


- 


1.35 


— 


1.0 


MS 


3,8 


Delay Time, Enable Negative Transition to Data Valid 


tPDW 


- 


1.0 


- 


0.670 


- 


O.b 


/is 


3, 9, 10 


Delay Time, Enable Negative Transition to CMOS Data Valid 
PA0-PA7, CA2 


tCMOS 


- 


2.0 


- 


1.35 


- 


1.0 


MS 


4,9 


Delay Time, Enable Positive Transition to CB2 Negative Transition 


tCB2 


- 


1.0 


- 


0.670 


- 


0.5 


us 


3, 11, 12 


Delay Time, Data Valid to CB2 Negative Transition 


tDC 


20 


- 


20 


- 


20 


— 


ns 


3, 10 


Delay Time, Enable Positive Transition to CB2 Positive Transition 


tRSI 


- 


1.0 


- 


0.670 


- 


0.5 


MS 


3, 11 


Control Output Pulse Width, CA2/CB2 


PWcT 


500 


- 


375 


- 


250 


- 


ns 


3, 11 


Rise and Fall Time for CB1 and CB2 Input Signals 


tr. tf 


- 


1,0 


- 


1.0 




1.0 


(* 


12 


Delay Time, CB1 Active Transition to CB2 Positive Transition 


tRS2 


- 


2.0 


- 


1.35 




1.0 


MS 


3, 12 


Interrupt Release Time, IRQA and IROB 


t|R 


- 


1.60 


- 


1.10 


- 


0.85 


MS 


5, 14 


Interrupt Response Time 


tRS3 


- 


1.0 


- 


1.0 


- 


1.0 


MS 


5, 13 


Interrupt Input Pulse Time 


PW| 


500 


- 


500 


- 


500 


- 


ns 


13 


RESEt Low Time* 


tRL 


1.0 


- 


0.66 


- 


0.5 


- 


MS 


15 



•The RESET line must be high a minimum of 1.0 /is before addressing the PIA. 



FIGURE 2 - BUS TIMING TEST LOADS 



ID0-D7) 



Test Point o — t 




5.0 V 



RL = 2.4kO 



MMD6150 
or Equiv. 

MMD7000 
or Equiv. 



FIGURE 3 - TTL EQUIVALENT 
TEST LOAD 

(PA0-PA7, PB0-PB7, CA2,CB2) 

,5.0 V 



Test Point O — f- 
V| 




C = 30pF, R = 12k 



FIGURE 4 - CMOS EQUIVALENT 
TEST LOAD 

(PA0-PA7, CA2) 

Test Point O 



FIGURE 5 ~ NMOS EQUIVALENT 
TEST LOAD 

(Fro Only) 
5.0 V 



3kO 



30 pF 



Test Point o- 



100 pF s; 



(g) 
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FIGURE 6 - PERIPHERAL DATA SETUP AND HOLD TIMES 
(Read Mode) 



PA0-PA7 
PB0-PB7 



X 



tPDS 



Enable 



r 



:c: 



-tPDH 



FIGURE 7 - CA2 DELAY TIME 
(Read Mode; CRA-5=CRA3=1, CRA-4=0) 



Enable 



tCA2 



CA2 



\ PWcT H A : — 



'Assumes part was deselected during 
the previous E pulse. 



FIGURE 8 - CA2 DELAY TIME 
(Read Mode; CRA-6=1, CRA-3=CRA-4=0) 



Enable 



\ 



CA1 



-//- 



VA- 



h- tr.tf 



K 



CA2 



-^*CA2--i *RS2-i- 

■//■ 



\^. 



FIGURE 9 - PERIPHERAL CMOS DATA DELAY TIMES 
(Write Mode; CRA-5=CRA-3=1, CRA-4=0) 



Enable 



'CMOS— |— 

tpwoU -44- Vcc -30% Vcc 



PA0-PA7, 

CA2 



X 



FIGURE 10 - PERIPHERAL DATA AND CB2 DELAY TIMES 
(Write Mode; CRB-5=CRB-3=1, CRB-4=0) 



Enable 



/" 



PB0-PB7 



X 



tPDW 



■•*DC- 



CB2* 

CB2 goes low as a result of the 
positive transition of Enable. 



FIGURE 11 - CB2 DELAY TIME 
(Write Mode; CRB-5=CRB-3=1, CRB-4=0) 



Enable 



CB2 






— 'CB2 



-^tRS1* 



-PWcT- 



■J 



"Assumes part was deselected during the 
previous E pulse. 



FIGURE 12 - CB2 DELAY TIME 
Write Mode; CRB^5=1, CRB-3=CRB-4=0) 



/^"^ 



CB1 



-//- 



-ff- 



— *CB2*- 



CB2 



\. 



-//- 



X 



f tptf 



VA- 



tRS2'-.-j L- 



* Assumes part was deselected during 
any previous E pulse. 



FIGURE 13 - INTERRUPT PULSE WIDTH AND iM RESPONSE 

PW| 



CA1, 2 
CB1,2 



X 



IRQA/B 



X 

I 



^ 



«RS3*- 



H 



'Assumes Interrupt Enable Bits are set. 



Note: Timing measurements are referenced to and from a low voltage of 0.8 volts and a high voltage of 2.0 volts, unless otherwise noted. 
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FIGURE 14 - IRQ RELEASE TIME 



Enable 



A 



FIGURE 15 - RESET LOW TIME 

■ tRL 



RESET 



t|R- 



IRQ 



/ 



\ 



/ 



'The RESET line must be a V|(-| for a minimum of 
1 .0 (is before addressing the PIA. 



Note: Timing measurements are referenced to and from a low voltage of 0.8 volts and a high voltage of 2.0 volts, unless otherwise noted. 



FIGURE 16 - EXPANDED BLOCK DIAGRAM 







Interrupt Status 
Control A 



Data Direction 

Register A 

(DDRA) 



5Z 



Peripheral 

Interface 

A 



Peripheral 

Interface 

B 



zs: 



Data Direction 
Register B 

(DDRB) 



• 40 CAl 
■ 39 CA2 



2 PAO 

3 PA1 

4 PA2 

5 PA3 

• 6 PA4 
7 PA5 

• 8 PA6 
- 9 PA7 



•-10 PBO 




17 PB7 



IRQB 37 -« 



Interrupt Status 
Control B 



18 CB1 

-•-19 CB2 
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PIA INTERFACE SIGNALS FOR MPU 



The PIA interfaces to the M6800 bus with an 8-bit bidirec- 
tional data bus, three chip select lines, two register select 
lines, two interrupt request lines, a read/write line, an enable 
line and a reset line. To ensure proper operation with the 
MC6800, MC6802, or MC6808 microprocessors, VMA 
should be used as an active part of the address decoding. 



Bidirectional Data (D0-D7) - The bidirectional data lines 
(DO-D?) allow the transfer of data between the MPU and the 
PIA. The data bus output drivers are three-state devices that 
rennain in the high-impedance (off) state except when the 
MPU performs a PIA read operation. The read/write line is in 
the read (high) state when the PIA is selected for a read 
operation. 

Enable (E) — The enable pulse, E, is the only timing 
signal that is supplied to the PIA. Timing of all other signals 
is referenced to the leading and trailing edges of the E pulse. 

Read/Write (R/W) - This signal is generated by the 
MPU to control the direction of data transfers on the data 
bus. A low state on the PIA read/write line enables the input 
buffers and data is transferred from the MPU to the PIA on 
the E signal if the device has been selected. A high on the 
read/write line sets up the PIA for a transfer of data to the 
bus. The PIA output buffers are enabled when the proper ad- 
dress and the enable pulse E are present. 



RESET — The active low RESET line is used to reset all 
register bits in the PIA to a logical zero (low). This line can be 
used as a power-on reset and as a master reset during 
system operation. 

Chip Selects (CSO, CS1, and CS2) - These three input 
signals ar e use d to select the PIA. CSO and CS1 must be 
high and CS2 must be low for selection of the device. Data 
transfers are then performed under the control of the enable 
and read/write signals. The chip select lines must be stable 



for the duration of the E pulse. The device is deselected 
when any of the chip selects are in the inactive state. 

Register Selects {RSO and RS1) — The two register 
select lines are used to select the various registers inside the 
PIA. These two lines are used in conjunction with internal 
Control Registers to select a particular register that is to be 
written or read. 

The register and chip select lines should be stable for the 
duration of the E pulse while in the read or write cycle. 



Interrupt Request (I RQA a nd I RQB) - The active low In- 
terrupt Request lines (IRQA and IRQB) act to interrupt the 
MPU either directly or through interrupt priority circuitry. 
These lines are "open drain" (no load device on the chip). 
This permits all interrupt request lines to be tied together in a 
wire-OR configuration. 

Each Interrupt Request line has two internal interrupt flag 
bits that can cause the Interrupt Request line to go low. Each 
flag bit is associated with a particular peripheral interrupt 
line. Also, four interrupt enable bits are provided in the PIA 
which may be used to inhibit a particular interrupt from a 
peripheral device. 

Servicing an interrupt by the MPU may be accomplished 
by a software routine that, on a prioritized basis, sequentially 
reads and tests the two control registers in each PIA for in- 
terrupt flag bits that are set. 

The interrupt flags are cleared (zeroed) as a result of an 
MPU Read Peripheral Data Operation of the corresponding 
data register. After being cleared, the interrupt flag bit can- 
not be enabled to be set until the PIA is deselected during an 
E pulse. The E pulse is used to condition the interrupt control 
lines (CA1, CA2, CB1, CB2). When these lines are used as 
interrupt inputs, at least one E pulse must occur from the in- 
active edge to the active edge of the interrupt input signal to 
condition the edge sense network. If the interrupt flag has 
been enabled and the edge sense circuit has been properly 
conditioned, the interrupt flag will be set on the next active 
transition of the interrupt input pin. 



PIA PERIPHERAL INTERFACE LINES 



The PIA provides two 8-bit bidirectional data buses and 
four interrupt/control lines for interfacing to peripheral 
devices. 

Section A Peripheral Data (PA0-PA7) - Each of the 
peripheral data lines can be programmed to act as an input or 
output. This is accomplished by setting a "1" in the cor- 
responding Data Direction Register bit for those lines which 
are to be outputs. A "0" in a bit of the Data Direction 
Register causes the corresponding peripheral data line to act 
as an input. During an MPU Read Peripheral Data Operation, 
the data on peripheral lines programmed to act as inputs ap- 
pears directly on the corresponding MPU Data Bus lines. In 
the input mode, the internal pullup resistor on these lines 
represents a maximum of 1.5 standard TTL loads. 

The data in Output Register A will appear on the data lines 
that are programmed to be outputs. A logical "1" written in- 
to the register will cause a "high" on the correspondirig data 



(@) 



line while a "0" results in a "low." Data in Output Register A 
may be read by an MPU "Read Peripheral Data A" operation 
when the corresponding lines are programmed as outputs. 
This data will be read property if the voltage on the 
peripheral data lines is greater than 2.0 volts for a logic "1" 
output and less than 0.8 volt for a logic "0" output. Loading 
the output lines such that the voltage on these lines does not 
reach full voltage causes the data transferred into the MPU 
on a Read operation to differ from that contained in the 
respective bit of Output Register A. 



Section B Peripheral Data (PB0-PB7) - The peripheral 
data lines in the B Section of the PIA can be programmed to 
act. as either inputs or outputs in a similar manner to PAO- 
PA7. They have three-state capabiity, allowing them to enter 
a high-impedance state when the peripheral data line is used 
as an input. In addition, data on the peripheral data lines 



Af OTOf?OI->l Semiconductor Products Inc. 



MC6821«MC68A21»MC68B21 



PB0-PB7 will be read properly from those lines programmed 
as outputs even if the voltages are belov\^ 2.0 volts for a 
"high" or above 0.8 V for a "low". As outputs, these lines 
are compatible with standard TTL and may also be used as a 
source of up to 1 milliampere at 1 .5 volts to directly drive the 
base of a transistor switch. 

Interrupt Input (CA1 and CB1) - Peripheral input lines 
CA1 and CB1 are input only lines that set the interrupt flags 
of the control registers. The active transition for these 
signals is also programmed by the two control registers. 

Peripheral Control (CA2) — The peripheral control line 
CA2 can be programmed to act as an interrupt input or as a 



peripheral control output. As an output, this line is compati- 
ble with standard TTL; as an input the internal pullup resistor 
on this line represents 1 .5 standard TTL loads. The function 
of this signal line is programmed with Control Register A. 

Peripheral Control (CB2) - Peripheral Control line CB2 
may also be programmed to act as an interrupt input or 
peripheral control output. As an input, this line has high in- 
put impedance and is compatible with standard TTL. As an 
output it is compatible with standard TTL and may also be 
used as a source of up to 1 milliampere at 1 .5 volts to directly 
drive the base of a transistor switch. This line is programmed 
by Control Register B. 



INTERNAL CONTROLS 



INITIALIZATION 



A RESET has the effect of zeroing all PIA registers. This 
will set PA0-PA7, PB0-PB7, CA2 and CB2 as inputs, and all 
interrupts disabled. The PIA must be configured during the 
restart program which follows the reset. 

There are six locations within the PIA accessible to the 
MPU data bus: two Peripheral Registers, two Data Direction 
Registers, and two Control Registers. Selection of these 
locations is controlled by the RSO and RSI inputs together 
with bit 2 in the Control Register, as shown in Table 1. 

Details of possible configurations of the Data Direction 
and Control Register are as follows: 





TABLE 1 - 


- INTERNAL ADDRESSING 


RSI 


RSO 


Control 
Register Bit 


Location Selected 


CRA-2 


CBB-2 








1 


X 


Peripheral Register A 











X 


Data Direction Register A 





1 


X 


X 


Control Register A 


1 





X 


1 


Peripheral Register B 


1 





X 





Data Direction Register B 


1 


1 


X 


X 


Control Register B 



X = Don't Care 



PORT A-B HARDWARE CHARACTERISTICS 

As shown in Figure 17, the MC6821 has a pair of I/O ports 
whose characteristics differ greatly. The A side is designed 
to drive CMOS logic to normal 30% to 70% levels, and incor- 
porates an internal pullup device that remains connected 
even in the input mode. Because of this, the A side requires 
more drive current in the input mode than Port B. In con- 
trast, the B side uses a normal three-state NMOS buffer 
which cannot pullup to CMOS levels without external 
resistors. The B side can drive extra loads such as Darl- 
ingtons without problem. When the PIA comes out of reset, 
the A port represents inputs with pullup resistors, whereas 
the B side (input mode also) will float high or low, depending 
upon the load connected to it. 



Notice the differences between a Port A and Port B read 
operation when in the output mode. When reading Port A, 
the actual pin is read, whereas the B side read comes from an 
output latch, ahead of the actual pin. 

CONTROL REGISTERS (CRA and CRB) 

The two Control Registers (CRA and CRB) allow the MPU 
to control the operation of the four peripheral control lines 
CA1, CA2, CB1,andCB2. In addition they allow the MPU to 
enable the interrupt lines and monitor the status of the inter- 
rupt flags. Bits through 5 of the two registers may be writ- 
ten or read by the MPU when the proper chip select and 
register select signals are applied. Bits 6 and 7 of the two 
registers are read only and are modified by external interrupts 
occurring on control lines CA1, CA2, CB1, or CB2. The for- 
mat of the control words is shown in Figure 18. 

DATA DIRECTION ACCESS CONTROL BIT (CRA-2 an8 
CRB-2) 

Bit 2, in each Control Register (CRA and CRB), deter- 
mines selection of either a Peripheral Output Register or the 
corresponding Data Direction E Register when the proper 
register select signals are applied to RSO and RSI. A "1" in 
bit 2 allows access of the Peripheral Interface Register, while 
a "0" causes the Data Direction Register to be addressed. 

Interrupt Flags (CRA-6, CRA-7, CRB-6, and CRB-7) - 

The four interrupt flag bits are set by active transitions of 
signals on the four Interrupt and Peripheral Control lines 
when those lines are programmed to be inputs. These bits 
cannot be set directly from the MPU Data Bus and are reset 
indirectly by a Read Peripheral Data Operation on the ap- 
propriate section. 

Control of CA2 and CB2 Peripheral Control Lines (CRA-3, 
CRA-4, CRA-5, CRB-3, CRB.-4, and CRB-5) - Bits 3, 4, and 
5 of the two control registers are used to control the CA2 and 
CB2 Peripheral Control lines. These bits determine if the con- 
trol lines will be an interrupt input or an output control 
signal. If bit CRA-5 (CRB-5) is low, CA2 (CB2) is an interrupt 
input line similar to CA1 (CB1). When CRA-5 (CRB-5) is 
high, CA2 (CB2) becomes an output signal that may be used 
to control peripheral data transfers. When in the output 
mode, CA2 and CB2 have slightly different loading 
characteristics. 
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Control of CA1 and CB1 Interrupt Input Lines <CRA-0, 
CRB-1, CRA-1, and CRB-1) - The two lowest-order bits of 
the control registers are used to control the interrupt input 
lines CA1 and CB1. Bits CRA-0 and CRB-0 are used to 



enable the MPU interrupt signals IRQA and IRQB, respec- 
tively. Bits CRA-1 and CRB-1 determine the active transition 
of the interrupt input signals CA1 and CB1. 



Port A 



Vcc 



FIGURE 17 - PORT A AND PORT B EQUIVALENT CIRCUITS 

Port B 



Vcc 



r-o-C 



Data 

Direction 

(1 -Output Pin) 

(0- Input Pin) 



Port Pin 

HH 



-<^ 



Data Direction 
DATA 




tion -5 V . 




To External 
Bus 



m~ 



<■ 



Read A Data 

in Input or 

Output Mode 



Internal PIA Bus 



Data Direction 
(1 — Input Pin) 
(0-Output Pin) 



Read of B 

Data When 

in Output 

Mode 







Port Pin 

HH 



Read of B 

Data when 

in Input Mode 



ORDERING INFORMATION 



MC68A21CP 
J" 



Motorola Integrated Circuit 

M6800 Family 

Blanks=1.0 MHz 
A =1.5 MHz 
8 = 2.0 MHz 

Device Designation 

In M6800 Family 

Temperature Range 

Blank = 0°— -i-70°C 
C= -^K)°— +85''C 

Package 

P= Plastic 
S = Cerdip 
L= Ceramic 



BETTER PROGRAM 

Better program processing is available on all types listed. Add 
suffix letters to part number. 

Level 1 add "S" Level 2 add "D" Level 3 add "DS" 

Level 1 "S" = 10Temp Cycles - 1-25 to 150°C); 

Hi Temp testing at T^ max. 
Level 2 "D"= 168 Hour Burn-in at 125°C 
Level 3 "DS" = Combination of Level 1 and 2. 



Speed 


Device 


Temperature Range 


1.0 MHz 

1.5 MHz 
2.0 MHz 


MC6821P,L,S 


to 70°C 


MC6821CP,CL,CS 


-40 to +85°C 


MC68A21P,L,S 
MC68A21CP,CL,CS 


Oto +70°C 
-40 to +85°C 


MC68B21P,L,S 


Oto -h70°C 
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Determine Active CA1 (CB1) Transition for Setting 

Interrupt Flag IRQA(B)1 - (bit 7) 

b1 =0; IRQA(B)1 set by high-to-low transition on CAl 

(CB1) 
b1 = 1: IRQA(B)1 set by low-to-high transition on CAl 

(CB1). 



FIGURE 18 - CONTROL WORD FORMAT 



IRQAIB) 1 Interrupt Flag (bit 7) 
Goes high on active transition of CAl (CBD; Automa- 
tically cleared by MPU Read of Output Register A(B). 
May also be cleared by hardware Reset. 



CA1 (CBD Interrupt Request Enable/ Disable 

bO=0: Disables IRQA(B) MPU Interrupt by CAl 

(CBD active transition J 
bO=1: Enable IROAiB) MPU Interrupt by CAl (CBD 

active transition. 
1 . IRQA(B) will occur on next (MPU generated) positive 
transition of bO if CAl (CBD active transition oc- 
curred while interrupt was disabled. 



Control Register 



b7 


b6 


b5 


b4 


b3 


b2 


b1 


bO 


IRQAIBll 
Flag 


IRQA(B)2 
Flag 


CA2 (CB2I 
Control 


DDR 
Access 


CAl (CBD 
Control 



X 



IRQA(B)2 Interrupt Flag (bit 6) 
When CA2 (CB2) is an input, IRQA(B) goes high on ac- 
tive transition CA2 {CB2); Automatically cleared by 
MPU Read of Output Register A(B). May also be 
cleared by hardware Reset. 

CA2 (CB2) Established as Output (b5=D: IRQA(B) 
2 = 0, not affected by CA2 (CB2) transitions. 



CA2 (CB2) Established as Output by b5= 1 

(Note that operation of CA2 and CB2 output 

b5 M b3 



1 



b5 b4 b3 



1 1 



functions are not identical) 
>-CA2 

b3=0: Read Strobe with CA1 Restore 

CA2 goes low on first high-to-low 
E transition following an MPU read 
of Output Register A; returned high 
by next active CAl transition, as 
specified by bit 1 . 
b3 = 1 : Read Strobe with E Restore 

CA2 goes low on first high-to-low 
E transition following an MPU read 
of Output Register A; returned high 
by next high-to-low E transition dur- 
ing a deselect. 
»- CB2 

b3 = 0: Write Strobe with CB1 Restore 
CB2 goes low on first low-td-high 
E transition following an MPU write 
into Output Register B; returned 
high by the next active CB1 transi- 
tion as specified by bit 1. CRB-b7 
must first be cleared by a read of 
data. 
b3= 1: Write Strobe with E Restore 

CB2 goes low on first low-to-high 
E transition following an MPU write 
into Output Register B; returned 
high by the next low-to-high E tran- 
sition following an E pulse which 
occurred while the part vi/as de- 
selected. 
■»> Set/ Reset CA2 (CB2) 

CA2 (CB2) goes low as MPU writes 
b3=0 into Control Register. 
CA2 (CB2) goes high as MPU writes 
b3=1 into Control Register. 
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Determines Whether Data Direction Register Or Output 
Register is Addressed 

b2 = 0: Data Direction Register selected. 
b2= 1: Output Register selected. 



C/V2 (CB2) Established as Input by b5=0 



bg b4 b3 







1* 



CA2 (CB2) Interrupt Request Enable/ Disable 

b3 = 0; Disables IRQA(B) MPU Interrupt by 

CA2 (CB2) active transition.* 
b3=1; Enables IRQA(B) MPU Interrupt by 

CA2 (CB2) active transition. 

•|RQA(B) will occur on next (MPU generat- 

ted) positive transition of b3 if CA2 (CB2), 

active transition occurred while interrupt 

was disabled. 

Determines Active CA2 (CB2) Transition for 
Setting Interrupt Flag IRQA(B|2 - (Bit b6) 
b4 = 0: IRQAIB)2 set by high-to-low transi- 
tion on CA2 (CB2). 
b4=1: IRQA(B)2 set by low-to-high transi- 
tion on CA2 (CB2). 
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Appendix C 

6850 ACIA Registers/ 

Instructions 



The following specifications on the 6850 ACIA were furnished in full by 
Motorola, Inc: 
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3501 ED BLUESTEIN BLVD., AUSTIN, TEXAS 78721 



MC68A50 

(1.5 MHz) 

MC68B50 

(2.0lillHz) 



ASYNCHRONOUS COMMUNICATIONS INTERFACE 
ADAPTER (ACIA) 

The MC6850 Asynchronous Communications Interface Adapter pro- 
vides the data formatting and control to interface serial asynchronous 
data communications information to bus organized systems such as the 
MC680O Microprocessing Unit. 

The bus interface of the MC6850 includes select, enable, read/write, 
interrupt and bus interface logic to allow data transfer over an 8-bit 
bidirectional data bus. The parallel data of the bus system is serially 
transmitted and received by the asynchronous data interface, with pro- 
per formatting and error checking. The functional configuration of the 
ACIA is programmed via the data bus during system initialization. A 
programmable Control Register provides variable word lengths, clock 
division ratios, transmit control, receive control, and interrupt control. 
For peripheral or modem operation, three control lines are provided. 
These lines allow the ACIA to interface directly with the MC6860L 
0-600 bps digital modem. 

• 8- and 9-Bit Transmission 

• OJDtional Even and Odd Parity 

• Parity, Overrun and Framing Error Checking 

• Programmable Control Register 

• Optional -►■I, +16, and -^64 Clock Modes 

• Up to 1 .0 Mbps Transmission 

• False Start Bit Deletion 

• Peripheral/ Modem Control Functions 

• Double Buffered 

• One- or Two-Stop Bit Operation 



MC68B0 ASYNCHRONOUS COMMUNICATIONS INTERFACE ADAPTER 
BLOCK DIAGRAM 



Data Bus 



Address 
Conftrol 

a ltd 
Interrupt 







Data 

Bus 

buffers 












Transmitter 
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Receiver 
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Selection 

and 
Control 






Peripheral/ 
■ Modem 
Control 















Transmit 
Data 



Receive 
Data 



MOS 

(N-CHANNEL, SILICON-GATE) 

ASYNCHRONOUS 

COMMUNICATIONS INTERFACE 

ADAPTER 




S SUFFIX 

CERDIP PACKAGE 
CASE 623 



P SUFFIX 

PLASTIC PACKAGE 
CASE 709 



L SUFFIX 

CERAMIC PACKAGE 
CASE 716 





PIN ASSIGNMENT 




vssC 


1. W 


24 


I GTS 


RxDataC 


2 


23 


iDCD 


RxCLK[ 


3 


22 


I DO 


TxCLK[ 


4 


21 


ID1 


RTS[ 


5 


20 


1D2 


Tx Data [ 


6 


19 


IDS 


IRQ[ 


7 


18 


1D4 


CSO[ 


8 


17 


]D5 


CS2[ 


9 


16 


1D6 


CS1 [ 


10 


15 


1D7 


RS[ 


11 


14 


lE 


vcc[ 


12 


13 


]R/W 
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MAXIMUM RATINGS 



Characteristics 


Symbol 


Value 


Unit 


Supply Voltage 


vcc 


-0,3 to +7.0 


V 


Input Voltage 


Vin 


-0.3 to +7.0 


V 


Operating Temperature Range 
MC6850, MC68A50, MC68B50 
MC6850C, MC68A50C, MC68B50C 


Ta 


Tl to Th 

to 70 
-40 to +85 


"C 


Storage Temperature Range 


■•"stq 


-55 to +150 


°c 


THERMAL CHARACTERISTICS 


Characteristic 


Symbol 


Value 


Unit 


Thermal Resistance 
Plastic 
Ceramic 
Cerdip 


9JA 


120 

60 
65 


°c/w 



This device contains circuitry to protect the 
inputs against damage due to high static 
voltages or electric fields; however, it is ad- 
vised that normal precautions be taken to 
avoid application of any voltage higher than 
maximum rated voltages to this high- 
impedance circuit. Reliability of operation is 
enhanced if unused inputs are tied to an ap- 
propriate logic voltage level (e.g., either Vss 
orVcc>. 



POWER CONSIDERATIONS 



(1) 



The average chip-junction temperature, Tj, In °C can be obtained from; 

Tj = Ta+(Pd'6'JA) 
Where; 

Ta* Ambient Temperature, °C 

ffjA" Package Thermal Resistance, Junctlon-to-Amblent, °C/W 

pd«Pint+Pport 

Pint™ Ice X Vcc Watts - chip Internal Power 
PpORT^Port Power Dissipation, Watts - User Determined 
For most applications PpORT"<P|NT and can be neglected. PpoRT may become significant if the device is configured to 
drive Darlington bases or sink LED loads. 
An approximate relationship between Pq and Tj (if PpORT is neglected) is; 

PD=K-h(Tj + 273°C) (2) 

Solving equations 1 and 2 for K gives; 



< = PD»(TA + 273°C) + ejA*PD'^ 



(3) 



Where K is a constant pertaining to the particular part. K, can be determined from equation 3 by measuring Pp (at equilibrium) 
for a known Ta. Using this value of K the values of Pp and Tj can be obtained by solving equations ( 1 ) and (2) iteratlvely for any 
value of Ta. 



DC ELECTRICAL CHARACTERISTICS (Vcc = 5.0 Vdc ±5%, Vss = 0, Ta = Tl to Th unless otherwise noted.) 



Characteristic 


Symbol 


Min 


Typ 


Max 


Unit 


Input High Voltage 


V|H 


Vss + 2.0 


- 


Vcc 


V 


Input Low Voltage 


V|L 


Vss-0.3 


- 


Vss + 0.8 


V 


Input Leakage Current R/W, CSO, CSl , CSl Enable 
(V|n = to 5.25 V) RS, RxD, Rx C, CTS, DCD 


lin 


- 


1.0 


2.5 


.A 


Three-State (Off State) Input Current D0-D7 
(V|n = 0.4to2.4V) 


Itsi 


- 


2.0 


10 


/'A 


Output High Voltage D0-D7 
(lLoad= -205 ;iA, Enable Pulse Width <25 /«s) 
(iLoad = - 100 ;iA, Enable Pulse Width < 25 ns) Tx Data, RTS 


voh 


Vss + 2.4 
Vss + 2.4 


- 


- 


V 


Output Low Voltage (lLoad= l-^ mA, Enable Pulse Width<25 liS) 


VOL 


- 


— 


Vss + 0.4 


V 


Output Leakage Current (Off State) (Vqh = 2.4 V) IRO 


ILOH 


- 


1.0 


10 


,iA 


Internal Power Dissipation (Measured at Ta = Tl) 


Pint 


- 


300 


525 


mW 


Internal Input Capacitance 
(Vin = 0.TA = 25°C.f=1.0MHz) D0-D7 
E, Tx CLK, Rx CLK, R/W, RS, Rx Data, CSO, C51, CS2, CTS, DCD 


Cin 


- 


10 
7.0 


12.5 
7.5 


pF 


Output Capacitance RTS , Tx Data 
IVin = 0,TA=25''C,f = 1.0MHz) IHU 


Cout 


- 


- 


10 
5.0 


pF 
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SERIAL DATA TIMING CHARACTERISTICS 



Characteristic 


Symbol 


MC68S0 


MC68A50 


MC68B50 


Unit 


Min 


Max 


MIn 


Max 


Min 


Max 


Data Clock Pulse Width, Low ■>■ 16, -64 Modes 
(See Figure 1) +1Mode 


PWcL 


600 
900 


: 


450 
650 


- 


280 
500 


: 


ns 


Data Clock Pulse Width, High + 16, + 64 Modes 
(See Figure 2) -i-lMode 


PWcH 


600 
900 


: 


450 
650 


: 


280 
500 


: 


ns 


Data Clock Frequency ->- 16, + 64 Modes 

+ 1 Mode 


fc 


- 


0.8 
500 


- 


1.0 
750 


: 


1.5 
1000 


MHz 
kHz 


Data Clock-to-Data Delay for Transmitter (See Figure 3) 


nOD 


- 


600 


- 


540 


- 


460 


ns 


Receive Data Setup Time ( See Figure 4) + 1 Mode 


tRDS 


250 


- 


100 


- 


30 


- 


ns 


Receive Data Hold Time ( See Figure 5) +1 Mode 


IRDH 


250 


- 


100 


- 


30 


- 


ns 


Interrupt Request Release Time (See Figure 6) 


t|R 


- 


1.2 


- 


0.9 


- 


0.7 


Its 


Request-to-Send Delay Time (See Figure 6) 


tRTS 


- 


560 


- 


480 


- 


400 


ns 


Input Rise and Fall Times (or 10% of the pulse width if smallerl 


tr-tf 


- 


1.0 


- 


0.5 


- 


0.25 


MS 



FIGURE 1 - CLOCK PULSE WIDTH, LOW-STATE 

PWcL 



TxClk 

or 
Rx Clk 



FIGURE 2 - CLOCK PULSE WIDTH, HIGH-STATE 



Tx Clk 

or 
Rx Clk , 



/' '\ 



PWcH 



FIGURE 3 - TRANSMIT DATA OUTPUT DELAY 



Tx Clk 



\ / 



*TDD 



Tx Data 



X 



FIGURE 4 - RECEIVE DATA SETUP TIME 
I * 1 Model 



Rx Data Y 



Rx Clock 



tRDS 



/ V 



FIGURE 5 - RECEIVE DATA HOLD TIME 
( * 1 Mode) 



Rx Clk 



Rx Data 



/ ^ 



*ROH 



X 



FIGURE 6 - REQUEST-TO-SEND DELAY AND 
INTERRUPT-REOUEST RELEASE TIMES 



Enable 



RTS 



IRQ 



X 



"*RTS 



t|R- 



/ 



Note: Timing measurements are referenced to and from a low voltage of 0.8 volts and a high voltage of 2.0 volts, unless othenwise noted. 
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BUS TIMING CHARACTERISTICS (See Notes 1 and 2 and Figure 7) 


















Ident. 
Number 


Characteristic 


Symbol 


MC6850 1 


MC68A50 1 


MC68B50 


Unit 


Min 


Max 


Min 


Max 


Min 


Max 


1 


Cycle Time 


'eye 


1.0 


10 


0.67 


10 


0.5 


10 


>is 


2 


Pulse Width, E Low 


PWel 


430 


9500 


280 


9500 


210 


9500 


ns 


3 


Pulse Width, E High 


PWeh 


450 


9500 


280 


9500 


220 


9500 


ns 


4 


Clock Rise and Fall Time 


V. tf 


- 


25 


— 


25 


— 


20 


ns 


9 


Address Hold Time 


tAH 


10 


- 


10 


- 


10 


— 


ns 


13 


Address Setup Time Before E 


(AS 


80 


- 


60 


-^ 


40 


— 


ns 


14 ■ 


Chip Select Setup Time Before E 


tcs 


80 


- 


60 


- 


40 


— 


ns 


15 


Chip Select Hold Time 


tCH 


10 


- 


10 


- 


10 


— 


ns 


18 


Read Data Hold Time 


tDHR 


20 


50* 


20 


50* 


20 


bO" 


ns 


21 


Write Data Hold Time 


tDHW 


10 


- 


10 


— 


10 


— 


ns 


30 


Output Data Delay Time 


tDDR 


- 


290 


- 


180 


-^ 


150 


ns 


31 


Input Data Setup Time 


<DSW 


165 


— 


80 


— - 


fJO 




ns 



•The data bus output buffers are no longer sourcing or sinking current by tpHRmax (High Impedance) 



FIGURE 7 - BUS TIMING CHARACTERISTICS 



R/W, Address 
(Non-Muxed) 



Read Data 
Non-Muxed 



Write Data 
Muxed 




1. Voltage levels shown are V|_<0.4 V, VHa2.4 V, unless othenwise specified. 

2. Measurement points shown are 0.8 V and 2.0 V, unless otherwise specified. 



FIGURE 8 - BUS TIMING TEST LOADS 
Load A 

(00-07, RTS. Tx Data) 

5.0 V 

1 RL = 2.5kn 



_ . . 1^ MIV1D6150 

Test Point o— f 1 (• '< 

' ' ^ or bquiv. 



MMD7000 
or Equiv, 



® 



C = 130 pF fo r DO D7 

- 30 pF for RTS anri Tx Data 



Lo ad B 
(IRQ Only) 



Test Point O— 



R - 11.7 kn f or D0 -D7 

- 24 kn for RTS and Tx Data 



5.0 V 
3kn 

; 100 pF 



MGTGRGLA Semiconductor Products Inc. 



M C6850* M C68A50* M C68B50 



FIGURE 9 - EXPANDED BLOCK DIAGRAM 



Transmit Clock 4 
Enable 14 



Clock 
Gen 



Parity 
Gen 



Read /Write 


13 




Chip 


Chip Select 


8 




Select 


Chip Sielect 1 


10 




and 


Chip Sielect 2 


9 


— c 


Read/Write 


Register Select 


11 




Control 




c 



Data 

Bus 

Buffers 



^ 



Transmit 

Data 
Register 



=:> 



Transmit 

Shift 
Register 



Status 
Register 



C=n 



^ 



Vcc=Pin 12 
Vss = Pin 1 



Y 



Transmit 
Control 



Interrupt 
Logic 



Control 
Register 



Receive 

Data 
Register 



Receive Clock 3 



6 Transmit Data 

24 Clear-to-Send 

7 Interrupt Request 
23 Data Carrier Detect 

• 5 Request'to-Send 



Receive 

Control 



Parity 
Check 



c= 



Receive 

Shift 

Register 



Clock 
Gen 



Sync 
Logic 



2 Receive Data 



DEVICE OPERATION 

At the bus interface, the ACIA appears as two addressable 
memory locations. Internally, there are four registers: two 
read-only and two write-only registers. The read-only 
registers are Status and Receive Data; the write-only 
registers are Control and Transmit Data. The serial interface 
consists of serial input and output lines with independent 
clocks, and three peripheral/modem control lines. 

POWER ON/MASTER RESET 

The master reset (CRO, CRD should be set during system 
initialization to insure the reset condition and prepare for pro- 
gramming the ACIA functional configuration when the com- 
munications chann el is required. During the first master 
reset, the IRQ and RTS outpu ts are held at level 1. On all 
other master resets, the RTS output can be programmed 
high or low with the IRQ output held high. Control bits CR5 
and CR6 should also be programmed to define the state of 
RTS whenever master reset is utilized. The ACIA also con- 
tains internal power-on reset logic to detect the power line 
turn-on transition and hold the chip in a reset state to pre- 
vent erroneous output transitions prior to initialization. This 
circuitry depends on clean power turn-on transitions. The 



power-on reset is released by means of the bus-programmed 
master reset which must be applied prior to operating the 
ACIA. After master resetting the ACIA, the programmable 
Control Register can be set for a number of options such as 
variable clock divider ratios, variable word length, one or two 
stop bits, parity (even, odd, or none), etc. 

TRANSMIT 

A typical transmitting sequence consists of reading the 
ACIA Status Register either as a result of an interrupt or in 
the ACIA's turn in a polling sequence. A character may be 
written into the Transmit Data Register if the status read 
operation has indicated that the Transmit Data Register is 
empty. This character is transferred to a Shift Register where 
it is serialized and tfansmitted from the Transmit Data output 
preceded by a start bit and followed by one or two stop bits. 
Internal parity (odd or even) can be optionally added to the 
character and will occur between the last data bit and the 
first stop bit. After the first character is written in the Data 
Register, the Status Register can be read again to check for a 
Transmit Data Register Empty condition and current 
peripheral status. If the register is empty, another character 
can be loaded for transmission even though the first 
character is in the process of being transmitted (because of 
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double buffering). The second character will be automatical- 
ly transferred into the Shift Register when the first character 
transmission is completed. This sequence continues until all 
the characters have been transmitted. 

RECEIVE 

Data is received from a peripheral by means of the Receive 
Data input. A divide-by-one clock ratio is provided for an ex- 
ternally synchronized clock (to its data) while the divide- 
by-16 and 64 ratios are provided for internal synchronization. 
Bit synchronization in the divide-by-16 and 64 modes is in- 
itiated by the detection of 8 or 32 low samples on the receive 
line in the divide-by-16 and 64 modes respectively. False start 
bit deletion capability insures that a full half bit of a start bit 
has been received before the internal clock is synchronized 
to the bit time. As a character is being received, parity (odd 
or even) will be checked and the error indication will be 
available in the Status Register along with framing error, 
overrun error, and Receive Data Register full. In a typical 
receiving sequence, the Status Register is read to determine 
if a character has been received from a peripheral. If the 
Receiver Data Register Is full, the character is placed on the 
8-bit ACIA bus when a Read Data command is received from 
the MRU. When parity has been selected for a 7-bit word (7 
bits plus parity), the receiver strips the parity bit (D7 = 0) so 
that data alone Is transferred to the MPU. This feature 
reduces MPU programming. The Status Register can con- 
tinue to be read to determine when another character is 
available in the Receive Data Register. The receiver is also 
double buffered so that a character can be read from the 
data register as another character is being received in the 
shift register. The above sequence continues until all 
characters have been received. 



INPUT/OUTPUT FUNCTIONS 

ACIA INTERFACE SIGNALS FOR MPU 

The ACIA interfaces to the M6800 MPU with an 8-bit 
bidirectional data bus, three chip select lines, a register select 
line, an interrupt request line, read/write line, and enable 
line. These signals permit the MPU to have complete control 
over the ACIA. 

ACIA Bidirectional Data (D0-D7) - The bidirectional data 
lines (D0-D7) allow for data transfer between the ACIA and 
the MPU. The data bus output drivers are three-state devices 
that remain in the high-irripedance (off) state except when 
the MPU performs an ACIA read operation. 

ACIA Enable (E) - The Enable signal, E, is a high- 
impedance TTL-compatible input that enables the bus in- 
put/output data buffers and clocks data to and from the 
ACIA. This signal will normally be a derivative of the MC6800 
<l>2 Clock or MC6809 E clock. 

Read/Write (R/W) - The Read/Write line is a high- 
impedance input that is TTL compatible and is used to con- 
trol the direction of data flow through the ACIA's input/ out- 
put data bus interface. When Read/Write is high (MPU Read 
cycle), ACIA output drivers are turned on and a selected 
register is read. When it is low, the ACIA output drivers are 



turned off and the MPU writes into a selected register. 
Therefore, the Read/Write signal is used to select read-only 
or write-only registers within the ACIA. 

Chip Select (CSO, CS1, CS2) - These three high- 
impedance TTL-compatible input lines are used to address 
the ACIA. The ACIA is selected when CSO and CS1 are high 
and CS2 is low. Transfers of data to and from the ACIA are 
then performed under the control of the Enable Signal, 
Read/Write, and Register Select. 

Register Select (RS) - The Register Select line is a high- 
impedance input that is TTL compatible. A high level is used 
to select the Transmit/ Receive Data Registers and a low 
level the Control/Status Registers. The Read/Write signal 
line is used in conjunction with Register Select to select the 
read-only or write-only register in each register pair. 

Interrupt Request (IRQ) - Interrupt Request is a TTL- 
compatible, open-drain (no internal pullup), activ e low out- 
put that is used to interrupt the MPU. The IRQ output re- 
mains low as long as the cause of the interrupt is present and 
the appropriate interrupt enable within t he A CIA is set. The 
IRQ status bit, when high, indicates the TR^'output is in the 
active state. 

Interrupts result from conditions in both the transmitter 
and receiver sections of the ACIA. The transmitter section 
causes an interrupt when th e Tra nsmitter Interrupt Enabled 
condition is selected (CR5»CR6), and the Transmit Data 
Register Empty (TDRE) status bit is high. The TDRE status 
bit indicates the current status of the Transmi tter Data 
Register except when inhibited by Clear-to-Send (CTS) be- 
ing high or the ACIA being maintained in the Reset condi- 
tion. The interrupt is cleared by writing data into the 
Transmit Data Register. The interrupt is masked by disabling 
the T ransmitter Interrupt via CR5 or CR6 or by the loss of 
CTS which inhibits the TDRE status bit. The Receiver sec- 
tion causes an interrupt when the Receiver Interrupt Enable 
is set and the Receive Data Register Full (RDRF) statu s bit is 
high, an Overrun has occurred, or Data Carrier Detect (DCD) 
has gone high. An interrupt resulting from the RDRF status 
bit can be cleared by reading data or re setting the ACIA. In- 
terrupts caused by Overrun or loss of DCD are cleared by 
reading the status register after the error condition has oc- 
curred and then reading the Receive Data Register or reset- 
ting the ACIA. The receiver interrupt is masked by resetting 
the Receiver Interrupt Enable. 

CLOCK INPUTS 

Separate high-impedance TTL-compatible inputs are pro- 
vided for clocking of transmitted and received data. Clock 
frequencies of 1, 16, or 64 times the data rate may be 
selected. 

Transmit Clock (Tx CLK) - The Transmit Clock input is 
used for the clocking of transmitted data. The transmitter in- 
itiates data on the negative transition of the clock. 

Receive Clock (Rx CLK) - The Receive Clock input is 
used for synchronization of received data. (In the ■*■ 1 mode, 
the clock and data must be synchronized externally.) The 
receiver samples the data on the positive transition of the 
clock. 
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SERIAL INPUT/OUTPUT LINES 

Receive Data (Rx Data) — The Receive Data line is a high- 
impedance TTL-compatible input through which data is 
received in a serial format. Synchronization with a clock for 
detection of data is accomplished internally when clock rates 
of 16 or 64- times the bit rate are used. 



ACIA REGISTERS 

The expanded block diagram for the ACIA indicates the in- 
ternal registers on the chip that are used for the status, con- 
trol, receiving, and transmitting of data. The content of each 
of the registers is summarized in Table 1 . 



Transmit Data (Tx Data) — The Transmit Data output line 
transfers serial data to a modem or other peripheral. 

PERIPHERAL/ MODEM CONTROL 

The ACIA includes several functions that permit limited 
control of a peripheral or modem. The functions included are 
Clear-to-Send, Request-to-Send and Data Carrier Detect. 

Clear-to-Send (GTS) — This high-impedance TTL- 
compatible input provides automatic control of the transmit- 
ting end of a communications link via the modem Clear-to- 
Send active low output by inhibiting the Transmit Data 
Register Empty (TDRE) status bit. 

Request'to-Send (RTS) - The Request-to-Send output 
enables the MPU to control a peripheral or modem via the 
data bus. The RTS output corresponds to the state of the 
Control Register bits CR5 a nd CR6. When CR6=0 or both 
CR5 and CR6= 1, the RTS output is low (the active state). 
This output can also be used for Data Terminal Ready (DTR). 

Data Carrier Detect (DCD) — This high-impedance TTL- 
compatible input provides automatic control, such as in the 
receiving end of a communications lin k by means of a 
modem Data Carrier Detect output. The DCD input inhibits 
and initializes the receiver section of the ACIA when high. A 
low-to-high transition of the Data Carrier Detect initiates an 
interrupt to the MPU to indicate the occurrence of a loss of 
carrier when the Receive Interrupt Enab le bit is set. The 
Rx CLK must be running for proper DCD operation. 



TRANSMIT DATA REGISTER (TDR) 

Data is written in the Transmit Data Register during the 
negative transition of the enableJE) when the ACIA has been 
addressed with RS high and R/W low. Writing data into the 
register causes the Transmit Data Register Empty bit in the 
Status Register to go low. Data can then be transmitted. If 
the transmitter is idling and no character is being transmit- 
ted, then the transfer will take place within 1-bit time of the 
trailing edge of the Write command. If a character is being 
transmitted, the new data character will commence as soon 
as the previous character is complete. The transfer of data 
causes the Transmit Data Register Empty (TDRE) bit to in- 
dicate empty. 

RECEIVE DATA REGISTER (RDR) 

Data is automatically transferred to the empty Receive 
Data Register (RDR) from the receiver deserializer (a shift 
register) upon receiving a complete character. This event 
causes the Receive Data Register Full bit (RDRF) in the 
status buffer to go high (full). Data may then be read 
through the bus by addressing the ACIA_and selecting the 
Receive Data Register with RS and R/W high when the 
ACIA is enabled. The non-destructive read cycle causes the 
RDRF bit to be cleared to empty although the data is re- 
tained in the RDR. The status is maintained by RDRF as to 
whether or not the data is current. When the Receive Data 
Register is full, the automatic transfer of data from the 
Receiver Shift Register to the Data Register is inhibited and 
the RDR contents remain valid with its current status stored 
in the Status Register. 



TABLE 1 - DEFINITION OF ACIA REGISTER CONTENTS 



Data 

Bus 

Line 

Number 


Buffer Address | 


RS • R/W 
Transmit 

Data 
Register 


RS • R/W 
Receive 

Data 
Register 


rs»r7w 

Control 
Register 


RS • R/W 

Status 
Register 


(Write Only) 


(Read Only) 


(Write Only) 


(Read Only) 





Data Bit 0* 


Data Bit 


Counter Divide 
Select 1 (CRO) 


Receive Data Register 
Full iRDRF) 


1 


Data Bit 1 


Data Bit 1 


Counter Divide 
Select 2.1CR1) 


Transmit Data Register 
Empty ITDREl 


2 


Data Bit 2 


Data Bit 2 


Word Select 1 
(CR2I 


Data Carrier Detect 
(DCD) 


3 


Data Bit 3 


Data Bit 3 


Word Select 2 
(CR3) 


Clear-to Send 
(GTS) 


4 


Data Bit 4 


Data Bit 4 


Word Select 3 
(CR4) 


Framing Error 
(FE) 


5 


Data Bit 5 


Data Bit 5 


Transmit Control 1 
(CR5) 


Receiver Overrun 
(OVRN) 


6 


Data Bit 6 


Data Bit 6 


Transmit Control 2 
(CR6) 


Parity Error (PE) 


7 


Data Bit y • 


Data Bit 7" 


Receive Interrupt 
Enable (CR7) 


Interrupt Request 
(IRQ) 



Leading bit ^ LSB - Bit 

Data bit will be zero in 7 bit plus parity modes. 

Data bit is "don't care" in 7-bit plus parity modes. 
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CONTROL REGISTER 

The ACIA Control Register consists of eigfn bits of write- 
only buffer that are selected when RS and R/W are low. This 
register controls the function of the receiver, transmitter, in- 
terrupt enables, and the Request-to-Send peri- 
pheral/modem control output. 

Counter Divide Select Bits (CRO and CR1) - The Counter 
Divide Select Bits (CRO and CRD determine the divide ratios 
utilized in both the transmitter and receiver sections of the 
ACIA. Additionally, these bits are used to provide a master 
reset for the ACIA which clear s th e Stat us Register (except 
for external conditions on CTS and DCD) and initializes both 
the receiver and transmitter. Master reset does not affect 
other Control Register bits. Note that after power-on or a 
power fail/ restart, these bits must be set high to reset the 
ACIA. After resetting, the clock divide ratio may be selected. 
These counter select bits provide for the following clock 
divide ratios: 



CRT 


CRO 


Function 





1 
1 




1 



1 


+ 1 

*16 

*64 

Master Reset 



Word Select Bits (CR2, CR3, and CR4) - The Word 
Select bits are used to select word length, parity, and the 
number of stop bits. The encoding format is as follows: 



CR4 


CR3 


CR2 


Function 











7 Bits + Even Parity + 2 Stop Bits 








1 


7 Bits + Odd Parity +2 Stop Bits 





1 





7 Bits + Even Parity +1 Stop Bit 





1 


1 


7 Bits + Odd Parity + 1 Stop Bit 


1 








8 Bits + 2 Stop Bits 


1 





1 


8 Bits+1 Stop Bit 


1 


1 





8 Bits + Even parity* 1 Stop Bit 


1 


1 


1 


8 Bits + Odd Parity +1 Stop Bit 



Word length. Parity Select, and Stop Bit changes are not 
buffered and therefore become effective immediately. 

Transmitter Control Bits (CR5 and CR6) - Two Transmit- 
ter Control bits provide for the control of the interrupt from 
the Tra nsmi t Data Register Empty condition, the Request-to- 
Send (RTS) output, and the transmission of a Break level 
(space). The following encoding format is used: 



CR6 


CR6 


Function 





1 
1 



1 


1 


RTS = low, Transmitting Interrupt Disabled. 

RTS = low, Transmitting Interrupt Enabled. 

RTS = high. Transmitting Interrupt Disabled. 

RTS = low. Transmits a Break level on the 
Transmit Data Output. Transmitting Inter- 
rupt Disabled. 



Receive Interrupt Enable Bit (CR7) - The following inter- 
rupts will be enabled by a high level in bit position 7 of the 
Control Register (CR7): Receive Data Register Full, Ov errun , 
or a low-to-high transition on the Data Carrier Detect (DCD) 
signal line. 



STATUS REGISTER 

Information on the status of the ACIA is available to the 
MRU by reading the ACIA Status Register. This read-only 
register is selected when RS is low and R/W is high. Infor- 
mation stored in this register indicates the status of the 
Transmit Data Register, the Receive Data Register and error 
logic, and the peripheral /modem status inputs of the ACIA. 

Receive Data Register Full (RDRF), Bit - Receive Data 
Register Full indicates that received data has been trans- 
ferred to the Receive Data Register. RDRF is cleared after an 
MRU read of the Receive Data Register or by a master reset. 
The cleared or empty state indicates that the contents of the 
Receive Data Register are not current. Data Carrier Detect 
being high also causes RDRF to indicate empty. 

Transmit Data Register Empty (TORE), Bit 1 - The 

Transmit Data Register Empty bit being set high indicates 
that the Transmit Data Register contents have been trans- 
ferred and that new data may be entered. The low state in- 
dicates that the register is full and that transmission of a new 
character has not begun since the last write data command. 

Data Carrier Detect (DCD), Bit 2 - The Data Carrier 
Detect bit will be high when the DCD input from a modem 
has gone high to indicate that a carrier is not present. This bit 
going high causes an Interrupt Request to be generated 
when the Rec eive Interrupt Enable is set. It remains high 
after the DCD input is returned low until cleared by first 
reading the Status Register and t hen t he Data Register or 
until a master reset occurs. If the DCD input remains high 
after read status and read d ata or master reset has occurred, 
the interrupt is clear ed, the DCD status bit remains high and 
will follow the DCD input. 

Clear-to-Send (CTS), Bit 3 - The Clear-to-Send bit in- 
dicates Jhe_state of the Clear-to-Send input from a modem. 
A low CTS indicates that there is a Clear-to-Send from the 
modem. In the high state, the Transmit Data Register Empty 
bit is inhibited and the Clear-to-Send status bit will be high. 
Master reset does not affect the Clear-to-Send status bit. 

Framing Error (FE), Bit 4 - Framing error indicates that 
the received character is improperly framed by a start and a 
stop bit and is detected by the absence of the first stop bit. 
This error indicates a synchronization error, faulty transmis- 
sion, or a break condition. The framing error flag is set or 
reset during the receive data transfer time. Therefore, this er- 
ror indicator is present throughout the time that the 
associated character is available. 

Receiver Overrun (OVRN), Bit 5 - Overrun is an error flag 
that indicates that one or more characters in the data stream 
were lost. That is, a character or a number of characters 
were received but not read from the Receive Data Register 
(RDR) prior to subsequent characters being received. The 
overrun condition begins at the midpoint of the last bit of the 
second character received in succession without a read of 
the RDR having occurred. The Overrun does not occur in the 
Status Register until the valid character prior to Overrun has 
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been read. The RDRF bit remains set until the Overrun is 
reset. Characjter synchronization is maintained during the 
Overrun condition. The Overrun indication is reset after the 
reading of data from the Receive Data Register or by a 
Master Resset. 

Parity Error (PE), Bit 6 — The parity error flag indicates 
that the number of highs (ones) in the character does not 
agree with the preselected odd or even parity. Odd parity is 
defined to be when the total number of ones is odd. The 
parity error indication will be present as long as the data 



character is in the RDR . If no parity is selected, then both the 
transmitter parity generator output and the receiver partiy 
check results are inhibited. 

Interrupt Request (IRQ), Bit 7 - The IRQ bit indicates the 
state of the IRQ output. Any interrupt condition with its ap- 
plicable enable will be In dicat ed in this status bit. Anytime 
the IRQ output is low the IRQ bit w ill be high to indicate the 
interrupt or service request status. IRQ is cleared by a read 
operation to the Receive Data Register or a write operation 
to the Transmit Data Register. 



PACKAGE DIMENSIONS 



rinrinnnnnnnnn 

rs4 13 



L 



l UUL I UUUUUUUUU 
-^- A ■■ • 



CASE 623-03 

(CERDIP) 



■4F 



-SEATINO PLANE 






JgU 



DIM 


MILLIMETERS 


IMCHES 1 


MIN 


MAX 


Mll\j 


MAX 




31.24 


32.77 


1.230 


1.290 




12.70 


15.49 


0.500 


0.610 




4.06 


6.69 


0.160 


0.220 




0.41 


n,5i 


0.016 


0.020 




1.27 


1.62 


0.050 


0.060 




2.5' BSC 


0.100 BSC 1 




0.20 


0.30 


0.008 


0.012 




2.29 


4.06 


0.090 


0.160 




16.24 BSC 


0.601 BSC 1 




0° 


16° 


0" 


16" 




0.51 


1.27 


0.020 


0.050 



NOTES: 

1. DIM "L" TO CENTER OF 
LEADS WHEN FORMED 
PARALLEL. 

2.LEADSWITHIN0.13mm 
(0.005) RADIUS OF TRUE 
POSITION AT SEATING 
PLANE AT MAXIMUM 
MATERIAL CONDITION. 
(WHEN FORMED PARALLEL) 



/SftArtrtAftftftftrtft 
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CASE 709-02 

(PLASTIC) 





A 




1 f 


^ M 1 




y^ 


w 


r^ 





^ 



DIM 


MILLIMETERS 


INCHES 1 


MIN 


MAX 


MIN 


MAX 

1.266" 


A 


31.37 


32.13 


1.235 


B 


13.72 


14.22 


0.640 


0.560 


C 


3.94 


5.08 


0.155 


0.200 


D 


0.36 


0.56 


0.014 


0.022 


F 


1.02 


1.52 


0040 


0.060 


G 


2.54 BSC 


0.100 


BSC 


H 


1.65 


2.03 


0.065 


0.080 


J 


0.20 1 


0.38 


0.008 

o.ri5 


0.015 
0.^36 


K 


2,fl2 


3.43 


L 


15.2< 


BSC 


0.60t 


BSC 


M 


0" 


15» 


OO 


16" 


N 


0.51 


1.02 


0.020 


0.040 



K I 

D ^^SIMINC --/ I— M 

PlAWt 



NOTES: 

1. POSITIONALTOLERANCEOF LEADS (0), 
SHALL BE WITHIN 0.26 mm (0.010) AT 
MAXIMUM MATERIAL CONDITION, IN 
RELATION TO SEATING PLANE AND 
EACH OTHER. 

2. DIMENSION L TO CENTER OF LEADS 
WHEN FORMED PARALLEL. 

3. DIMENSION B DOES NOT INCLUDE MOLD 
FLASH. 



) 




13 


B 












A 








H-^l- 



NOTE: 

1. LEADS TRUE POSITIONED WITHIN 
0.26mm (0.010) DIA (AT SEATING 
PLANE) AT MAXIMUM MATERIAL 
CONDITION. 

2. DIM "L"TO CENTER OF LEADS 
WHEN FORMED PARALLEL. 



CASE 716-06 

(CERAMIC) 



DIM 


MILLIMETERS 


INCHES 1 


MIN 


MAX 


MIN 


MAX 


A 


27.64 


30.99 


1.088 


1.220 


B 


14.73 


15.34 


0.580 


0.604 


n 


2.67 


4.32 


0.105 


0.170 


D 


0.38 


0.53 


0.015 


0.021 


F 


0.76 


1.40 


0.030 


0.056 


G 


2.6' BSC 


0.10 


BSC 


H 


0.76 


1.76 


q.030 


0.O70 


J 


70 


0.30 


0.008 


JLilU- 


K 


2.54 


4.67 


0.100 


0.180 


L 


14.99 


15.49 


0.690 


0.610 


M 


- 


10" 


_ 


10" 


N 


1.02 


1.52 


0.040 


0.060 



(& 
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ORDERING INFORMATION 



MC68A50CP 



J 



Motorola Integrated Circuit. 

M6800 Family 

Blanks= 1 .0 MHz 

A = 1.5 MHz 
B = 2.0 MHz 

Device Designation 

In M6800 Family 

Temperature Range 

Blank = 0°— +70°C 
C= -40°— +85°C 

Package 

P= Plastic 
S = Cerdip 
L= Ceramic 



BETTER PROGRAM 

Better program processing is available on all types listed. Add 
suffix letters to part number. 



Level 1 add "S" Level 2 add "D" 



Level 3 add "DS" 



Level 1 "S" = 10Terap Cycles - (-25 to 150°C); 

Hi Temp testing at T/^ max. 
Level 2 "D" = 168 Hour Burn-in at 125°C 
Level 3 "DS" = Combination of Level 1 and 2. 



Speed 


Device 


Temperature Range 


1.0 MHz 


MC6850P,L,S 
MC6850CP,CL,CS 


to 70 °C 
-40 to +85°C 


1.5 MHz 


MC68A50P,L,S 
MC68A50CP,CL,CS 


Oto +70°C 
-40 to -i-85°C 


2.0 MHz 


MC68B50P,L,S 


Oto +70°C 



Motorola reserves the right to make changes to any products herein to improve reliability, function or design. Motorola does not assume any liability arising 
out of the application or use of any product or circuit described herein: neither does it convey any license under its patent rights nor the rights of others. 
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Appendix D 

MB8877A Disk Controller 

Registers / Instructions 



The following specifications on the MB8877A disk controller were furnished 
in full by Fujitsu Microelectronics: 
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FLOPPY DISK 
FORMATTER/ 
CONTROLLER 



FLOPPY DISK FORMATTER/CONTPOLLER 



8876A 
8877A 



March 1982 
Edition 1.0 



One-Chip Floppy Fisk Formatter/Controller. 

Applicable to Single Density Floppy Disk, Double Density Floppy Disk and 

Mini Floppy Disk. 

Interfaceable to 8-bit Microprocessor. 

MB 8876A: Negative-logic 8-bit Data Bus. 

MB 8877A: Positive-logic 8-bit Data Bus. 
IBM Compatible Sector Format. 
Automatic Track Seeking and Verification. 
Both Single and Double Density Formats. 

a) Single Density in IBM 3740 Format and FM Recording. 

b) Double Density in IBM System-34 Format and MFM Recording. 
Programmable Single Sector/Multiple Sectors/Entire Track Read Operation. 
Programmable Single Sector/Multiple Sectors/Entire Track Wire Operation. 
Programmable Sector Length. 

Programmable Side Compare Function. 

Programmable Head Step Rate. 

Programmable Head Engage/Head Settle Time. 

Double Buffered Data I/O. 

DMA Data Transfer Capability. 

Write Precompensation Capability. 

All TTL Compatible I/O. 

Single -f-5V Power Supply. 

N-Channel E/D MOS Technology. 

Standard 40-pin Dual-In Line Package. 

MB 8876A: Upward Compatible with Western Digital FD1791-02. 

MB 8877 A: Upward Compatible with Western Digital FD1 793-02. 



ABSOLUTE MAXIMUM RATINGS 



Rating 


Symbol 


Value 


Unit 


Voltage on any pin to Vgs 


Vcc,V|,Vo 


-0.3 to -^7.0 


V 


Operating Temperature 


Top 


0to70 


°C 


Storage Temperature 


Tstg 


-55 to -HBO 


°C 




CERAMIC PACKAGE 
DIP-40C-A01 




PLASTIC PACKAGE 
DIP-40P-M01 



PIN ASSIGNMENT 




*HJCC 
WEC 

CSC 

REC 

A.C 

A^C 

DALO/DALOC 

PALI /Bali c 

DAL2/DAL2C 
DAL3/DAL3C 
DAL4/DAL4C 
DAL5/DALSC 
DAL6/DAL6C 
DAL7/DAOC 
STEPC 
DIBCC 
EARLYC 
LATEC 
MRC 
VssC 



1^ NC: Non Conrect.on 
^[MB 8876A Negative Logic 
ImB 8877A Positive Logic 



NOTE: Permanent device damage may occur if ABSOLUTE MAXIMUM 
RATINGS are exceeded. Functional operation should be restricted to 
the conditions as detailed in the operational sections of this data 
sheet. Exposure to absolute maximum rating conditions for extended 
periods may affect device reliability. 



This device contains circuitry to protect the 
inputs against damage due to high static volt- 
ages or electric fields. However, it is advised 
that normal precautions be taken to avoid 
application of any voltage higher than maxi- 
mum rated voltages to Jhis high impedance 
circuit. 
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MPU 



Fig. 1 - MB 8876A/MB 8877A SYSTEM CONSTRUCTURE 



2MHzor 

MR 1MHz +5V 



DDEN 



CS 



RE 



WE 



Aq, Ai 



o 



DALq ~ DAL7* 



DALq- DAL7* 



c> 



+5V 

I 



DRQ 



;10K 



IRQ 



noK 



CLK \ 

MB 8876A 

MB 8877A 

(FDC) 



INTERNAL 
REGISTER 



'CC 



COMMAND REG. 



STATUS REG. 



TRACK REG. 



SECTOR REG. 



DATA REG. 



STEP 



DIRC 



HLD 



ONE 
SHOT 



HLT 



TROO 



READY 



IP 



RG 



RAWREAD 



RCLK 



VFO 
CIRCUIT 



READ 



DATA 



WD 



EARLY 



+5V 
OK; 



WF/VFOE 



Vss 



TEST 



* MB 8876A: Negative Logic 
*• MB 8877A: Positive Logic 
•• Open Collector Output 



T 



LATE 



WRITE 

PRECOM- 

PENSATION 

CIRCUIT 



VFOE 
WRITE 



DATA 



WG 



<3 



^5> 



FLOPPY DISK 
DRIVE 
(FDD) 



TG43 



WF 



WPRT 



GUARANTEED OPERATING 
(Referenced to Vss) 


CONDITIONS 










Parameter 


Symbol 


Value 


Unit 


Operating 
Temperature 


Min. 


Typ. 


Max. 


Supply Voltage 


Vcc 


4.75 


5.00 


5.25 


V 


0°C to +70°C 


Vss 









Input High Voltage 


V,H 


2.0 




Vcc 


V 


Input Low Voltage 


V,L 


-0.3 




0.8 


V 
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PIN DESCRIPTIONS 



Pin No. 


Symbol 


Pin Name 


I/O 


Description 


20 


Vss 


Power Supply 


1 


Ground (GND) 


21 


Vcc 


+5V DC supply 


24 


CLK 


Clock 


1 


2-MHz fixed frequency clock signal (1-MHz for mini-floppy disk) 


19 


MR 


Master Reset 


1 


Signal for resetting the FDC 


22 


Test 


Test 


1 


Signal for setting the FDC Into a test mode 


1,40 


NC 


Non Connection 


- 


These pins are not used. 



MPU IIMTERFACE PINS 



37 


DDEN 


Double Density 


1 


Signal for selecting a FDC operation mode: 
When DDEN = 0, the double density operation mode is selected. 
When DDEN = 1 , the single density operation mode is selected. 
This input must be fixed while the FDC is in busy state. 


3 


CS 


Chip Select 


1 


Signal for controlling the DALs: When CS = 0, the DALs are 
activated and data transfer between the FDC and the MPU is 
enabled". When CS = 1, the DALs are in high impedance state 
and data transfer is inhibited, (i.e., RE and WE are ignored.) 


4 


RE 


Read Enable 


1 


Strobe signal provided when data is read from internal registers: 
When CS = RE = 0, data can be read from internal registers. 


2 


WE 


Write Enable 


1 


Strobe signal provided when data is written into internal registers: 
When CS = WE = 0, data can be written into internal registers. 


5,6 


Ao, Ai 


Register Select 
Line 


1 


Signal for addressing an internal register among Command Register 
(CR), Status Register (STR), Track Register (TR), Sector Register 
(SCR) and Data Register (DR): Refer to table of REGISTER 
SELECTION (p. 6) 


7-14 


DALo-DALy 
DALo~DAL7 


Data Access 
Line 


I/O 


8-bit bidirectional bus for transferring 8-bit data between the FDC 
and the MPU. MB 8876A: negative logic / MB 8877A: positive logic 


38 


DRQ 


Data Request 





Signal for informing the MPU of a DR status: Read operation: 
DRQ = 1 shows the DR is filled with a 8-bit data from a disk, and 
the FDC is requesting for the MPU to read the data. Write operation: 
DRQ = 1 shows the DR is empty, and the FDC is requesting for the 
MPU to write the next data into the DR. 


39 


IRQ 


Interrupt 
Request 





Interrupt signal to the MPU: IRQ is set when a Command is 
completed or the TYPE IV Command is executed. IRQ is reset when 
the next Command is written or the STR is read. 



FLOPPY DISK IIMTERFACE PINS 
Disk Head Control Signal 



15 


STEP 


Step Move 





Step pulse signal for moving a disk head. 


16 


DIRC 


Direction 





Signal for indicating a direction of disk head moving to the FDD: 
Dl RC = shows the head moves toward outside. Dl RC = 1 shows 
the head moves toward inside. 


28 


HLD 


Head Load 





Signal for loading a disk head: When HLD = 1, the head is engaged 
on the disk. When HLD = 0, the head is released from the disk. 
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Disk Head Control Signal (cont'd) 



Pin No. 


Symbol 


Pin Name 


I/O 


Description 


23 


HLT 


Head Load 
Timing 


1 


Signal for informing a disk head status: HLT = 1 shows a disk head 
is in an engaged state. HLT is set when a disk head has been settled 
or a head settle time pre-determined by one shot circuit has elapsed 
after HLD= 1. 


34 


TROO 


Track 00 


1 


Signal for informing whether a disk head is positioned on Track 
No. 00 or not; TROO = shows Track No. 00 is detected during 
track seaking operation. 


32 


READY 


Ready 


1 


Signal for informing the F DC of a disk drive status: READY = 1 
shows the disk drive is ready for operation, and only when READY 
= 1 , read/write operation for disk can be executed. READY = 
shows the disk drive is not ready, and neither read/write operation 
can not be executed. However, seek operation is excuted regardless 
of this signal. 


35 


IP 


Index Pulse 


1 


Signal for informing the FDC of an index hole of disk being detected 
in the FDD. 



Disk Read Operation Signal 



25 


RG 


Read Gate 





Signal for informing synchronization between RCLK and 
RAWREAD to an external VFO circuit: RG = 1 shows the FDC 
has found out a SYNC byte during disk reading operation. 


26 


RCLK 


Read Clock 


1 


A data window signal which is generated in an external VFO circuit 
out of Read Data. 


27 


RAWREAD 


Raw Read 


1 


A raw read data signal transferred from the FDD. 



Disk Write Operation Signal 






30 


WG 


Write Gate 





Signal for indicating data is being written into a disk. 


17 


EARLY 


Early Shift 





Signal for indicating early pre-compensation of data write timing to 
a disk: EARLY = 1 shows a serial data to be transmitted via the WD 
pin to a disk must be shifted earlier. 


18 


LATE 


Late Shift 





Signal for indicating later pre-compensation of data write timing to 
a disk: LATE = 1 shows a serial data to be transmitted via the WD 
pin to a disk must be shifted later. 


31 


WD 


Write Data 





A write data signal transferred to the FDD. 


29 


TG43 


Track Greater 
Than 43 





Signal for indicating a head position of a disk: TG43 = 1 shows the 
head is located on any of Track No. 44 thru 76. TG43 = shows 
the head is located on any of Track No. thru 43. 


33 


WF/VFOE 


Write Fault/ 

Variable 

Frequency 

Oscillator 

Enable 


I/O 


Input signal for informing a fault is detected during write operation 
for a disk (during WG = 1). Output signal forinforming the FDC 
is reading a disk (during WG = 0). 


34 


WPRT 


Write Protect 


1 


Signal for inhibiting write operation for disk. 
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REGISTER SELECTION 



Chip 
Select 


Address 


Selected Register 


Data Access Line Status 


CS 


Ai 


Ao 


Read Mode (RE = 0) 


Write Mode (WE = 0) 


DALy-DALo 
DALy ~ DALq 


1 


* 


# 


Deselected 


Deselected 


High Impedance 











Status Register (SIR) 


Command Register (CR) 


Enabled 








1 


Track Register (TR) 


Track Register (TR) 


Enabled 





1 





Sector Register (SCR) 


Sector Register (SCR) 


Enabled 





1 


1 


Data Register (DR) 


Data Register (DR) 


Enabled 



*: Don't care 



INPUT 
BUS line: 



TEST- 

MR - 
CLK - 

Vcc - 
Vss 



(GND) 



Fig. 2 - MB 8876A/MB 8877A BLOCK DIAGRAM 

DALq ~ DALyV-DALo ~ DALy** 



DATA I/O 
Buffer 



DATA REG. 
<DR) 



COMMAND 
REG. (CR) 



WD -^- 



DATA SHIFT 
REG. (DSRI 



I AM [3ET. I 



|CRC GEN.| -~ — 



DDEN- 
CS 

RE - 
WE - 
A„ - 
A, 



— -C 

-— c 



— DRQ 



IRQ ^^- 



MPU 
INTERFACE 



* MB 8876 A: 
** MB8877A: 



Negative Logic 
Positive Logic 



SECTOR 
REG. (SCR) 



^ 



TRACK 
REG. (TR) 




COMMAND 

PLA 
(232 X 19) 



DISK 
INTERFACE 



OUTPUT 

"bus line 



STATUS 
REG. (STR) 



-<RAWREAD 



-<RCLK 



— STEP 

— DIRC 
-^ HLD 

— HLT 



TROO 

R^EADY 

IP 

RG 

WG 

EARLY 



-— LATE 
-i-^ TG43 



WPRT 



-^ WF/VFOE 
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FUNCTIONAL BLOCK DESCRIPTIONS 

INTERNAL REGISTERS 

Command Register (CR) 

An 8-bit write-only register in which a Command is written 

from the MPU: 

A Command must be loaded in the CR during BUSY = 0. 

(The BUSY flag is Bit of the STR.) After completion of 

execution for a loaded Command, such a completion is 

informed to the MPU by setting the IRQ output high (IRQ = 

1 ), and resetting the BUSY flag. 

Status Register (STR) 

An 8-bit read-only register from which the MPU can read the 

contents to know a status of the FDC and the FDD: 

The contents of STR is automatically changed according to 

the status of executing Command. After the STR is read by 

the MPU, the IRQ output is usually reset to low (IRQ = 0) 

except for the Type IV Command. 

Data Register (OR) 

An 8-bit read/write register: 

In a read operation, an 8-bit parallel data is loaded from the 

DSR to the DR previously. 

For Seek Command, a loaded data in the DR means a track 

number to be sought. 

For Read Data Comand or Write Data Command, a stored 

data in the DR means a data read from a data field of disk or 

a data to be written into a data field. 

Data Shift Register (DSR) 

An 8-bit serial shift-register which can not be accessed 
directly by the MPU: 

In a disk read operation, a series of bit data read from a disk 
are transferred to the DSR, and then the filled data in the 
DSR is transferred in parallel to the DR. 
In a disk write operation, and 8-bit data in the DR is trans- 
ferred in parallel to the DSR, and then the filled data in the 
DSR is serially transferred and written into a disk bit by bit. 

Track Register (TR) 

An 8-bit read/write shift-register: 

For Restore, Seek, Step, Step-in and Step-Out Commands 
(i.e. TYPE I Command), a content of the TR means a present 
track number, and is updated during the Command exe- 
cution. 

For Read Data Command and Write Data Command: aeon- 
tent of the TR means a designated track number itself which 
is written into the TR prior to the Command execution and 
can not be renewed during the Command execution. 

Sector Register (SCR) 
An 8-bit read/write shift-register: 

For Read Data Command and Write Data Command, a desig- 
nated sector number is written into the SCR prior to the 
Command execution. 

For Read Address Command, a track number in the ID field 
is transferred to the SCR. 



OTHER FUNCTIONAL BLOCKS 

Cycle Redundancy Check (CRC) Circuit 

A circuit to check a misread/miswrite on a data which is seri- 
ally transferred between the FDC and a disk: 
In a write operation, a CRC data (16-bit serial bit cell) is 
automatically generated in the CRC circuit based on the 
original data and written in the disk together with the origi- 
nal data. 

In a read operation, a CRC data is read together with the 
target data to check an error. 

Arithmetic Logic Unit (ALU) 

The ALU has the functions of Serial Data Compare, Incre- 
ment {+^), Decrement (-1) and Through (±0). 
The ALU can renew a content of Register and compare data. 

Address Mark (AM) Detection Circuit 

A circuit to detect specific bit pattern data in serial data 
from a disk, such as the Index Mark (or Track Mark: I DM), 
ID Address Mark (or Address Mark: IDAM) and Data 
Address Mark (Data AM). 

Data Modulator 

A circuit to modulate data to be written into a disk in the 

specified recording format: 

Single density recording format: Frequency Modulation 

(FM) 
Double density recording format: Modified Frequency 

Modulation (MFM) 

Programmable Logic Array (PLA) for Commands 

A micro-program to generate control signals (Commands) 

which control the FDC operation: 

The size of micro-program is approximately 232 x 19 bits. 
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DC CHARACTERISTICS 

(Full Guaranteed Operating Conditions unless otherwise noted.) 



Parameter 


Symbol 


Value 


Unit 


Min. 


Typ. 


Max. 


Output High Voltage 
doH = -200mA) 


VoH 


2.4 






V 


Output Low Voltage 
(loL = 1.8 mA) 


Vol 






0.4 


V 


Three-State (Off -State) 

Input Current (V|n = 0.4V to 2.4V) 


'tsi 






10 


ma 


Input Leakage Current 
See Note 1) 


'iNI 






2.5 


AtA 


Input Leakage Current 
See Note 2) 


'lN2 






100 


HA 


Output Leakage Current for Off -State 
(VoH = 2.4V) 


'loh 






10 


juA 


Power Consumption 


Pc 






350 


mW 



Note 1) : Except for HLT, TEST, WF.WPRT, and DDEN. (V|N =0V to 5.25V) 
2) : For HLT, TEST, WF,WPRT, and DDEN. (V|n = OV to 5.25V) 



AC CHARACTERISTICS 

(Full Guaranteed Operating Conditions unless otherwise noted.) 

MRU Read Timing (From FDC) 



Parameter 


Symbol 


Value 


Unit 


Min. 


Typ. 


Max. 


Address Setup Time 


I^SET 


50 






ns 


Address Hold Time 


l^HLD 


10 






ns 


RE Pulse Width 


tRE 


280 






ns 


DRQ Reset Time 


*DRR 






250 


ns 


IRQ Reset Time 


^IRR 






500 


ns 


Data Delay Time (Cl = 25pF) 


toACC 






250 


ns 


Data Hold Time (Cl = 25pF) 


'doh 


50 




150 


ns 


DRQ Service Time (RCLK cycle = 2/is) 


tsEVR 






13.5* 


JUS 



: These values are doubled when CLK = 1 MHz. 
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MPU Write Timing (To FDC) 



Parameter 


Symbol 


Value 


Unit 


Min. 


Typ. 


Max. 


Address Setup Time 


tsET 


50 






ns 


Address Hold Time 


^HLD 


10 






ns 


WE Pulse Width 


^WE 


200 






ns 


DRQ Reset Time 


^DRR 






250 


ns 


IRQ Reset Time 


^IRR 






500 


ns 


Data Setup Time 


tDS 


250 






ns 


Data Hold Time 


toH 









ns 


DRQ Service Time {DDEN = "L") 


^SEVW 






11.5* 


MS 



These values are doubled when CLK = 1 MHz. 



DRQ 



IRQ 



cs 

Ao, A, 



RE 



DAL/DAL 



DRQ 



IRQ 



CS 

A„, A, 



WE 



DAL/DAL 



READ TIMING 

= 1.6ms* (MFM) or = 32ms* (FM)- 

0.4V y \.0.< 



/■ 



2J 



tSET 



OV 
£V. 



2.0V 

0.8V 
*DACC 



\ 



'DRR- 



1.4V 



-tSEVR- 



MRR- 



-tRE- 



M 



\a 



4V 



zov's/' 

0.8V, \ 



•hld 



2.0V 
8V 



HIGH-Z 



2.4V 



2.4V/ i^ 



-tDOH 
2.4V 



1.4V 



_a4v^/ 



WRITE TIMING 

— 16ms* (MFM) or 32ms* (FM)- 
).4V 



1M 



'SET 



!.0V 
3.8V 



!!ov\ 

O.SV'i 



Suo. 

-*DRR H 



-tSEVW- 



-twE- 



HIGH-Z 



Ids- 



V 



4V 



2.oy'<i/ 



'HLD 



>^0.8\ 



OV 
8V 



<1 



OV 
8V 



2.0^1, 
0.8V, f 



'DH 



/ 



HIGH-Z 



A 



4V 



HIGH-Z 



*: These values are doubled when CLK=_1MHz. 
8 
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FDC Read Data Timing (From Disk) 



PorciiYlPtPr 




Symbol 


Value 


Unit 




Min. 


Typ. 


Max. 


RAWREAD Pulse Width 


tpw 


100* 




250* 


ns 


Clock Setup Time 


to 


40 






ns 


Clock HoldTmefor MFM 


*CD 


40 






ns 


Clock Hold Time for FM 


tcs 


40 






ns 




MFM 


tBC 




2*, 3* or 4* 




MS 


RAWREAD Cycle Time 


FM 




2* or 4* 




MS 


RCLK High Pulse Width 


MFM 


tA 


0.8 


r 


20 


MS 


FM 


0.8 


2* 


20 


MS 


RCLK Low Pulse Width 


MFM 


tB 


0.8 


1* 


20 


MS 


FM 


0.8 


2* 


20 


MS 


RCLK Cycle Time 


MFM 


to 




2* 




MS 


FM 




4* 




MS 



These values are doubled when CLK = 1 MHz. 



RAW READ 



RCLK 



READ DATA TIMING 






osvy 



2.0V 



*PW 



-*BC- 



'2.0V 
).8V 



-•cs- 



^CD- 



2.0V 



N^O.SV 



-tc- 



0.8V' 5 /O. 



2.0V 

8V 



tCD 



X 



2.0V 
.8V 
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FDC Wi-ite Data Timing (To Disk) 



Parameter 


Symbol 






Value 


Unit 




Min. 


Typ. 


Max. 


Write Datr. Pulse Width 


^\ND 


CLK=2MHz 


FM 


450 


500 


550 


ns 


MFM 


150 


200 


250 


Write Gate to Write Data 


twG 


CLK =2MHz 


FM 


- 


2 


- 


MS 


MFM 


- 


1 


- 


Write Gate off from WD 


t ** 
IWF 


CLK = 2MHz 


FM 


- 


2 


- 


US 


MFM 


1 


- 


2 


Early (Late) to Write Data 


ts 


CLK = 2MHz MFM 


125 


- 


- 


ns 


Early (Late) from Write Data 


tH 


CLK = 2 MHz MFM 


-50* 


- 


- 


ns 


WD Valid after CLK 


toi 


CLK= 1 MHz MFM 


200 


- 


- 


ns 


CLK = 2 MHz MFM 


30 


- 


- 


WD Valid to CLK 


tD2 


CLK = 1 MHz MFM 


50 


- 


- 


ns 


CLK = 2 MHz MFM 


50 


- 


- 



*: This value, -50ns (min) indicates that Early (Late) signal changes 50ns (min) before WD falls down in worst case. 
See DISK DATA OUTPUT TIMING. 
**: All times are doubled when CLK = 1 MHz. 



WG 



WD 



WD 



EARLY 
(LATE) 



CLK 



WD 



WRITE DATA TIMING 



2A\J-,^ 



-^WG 
2.4V 



rv 



~%D- 



y. 



4V 
4V 



\ 



2.4V-J- 



'D1 — 



/ 



2.4V i' 5-2.4 

0.4V-/ \o 



!.4V 
1.4V 



2.4VY 
0.4V A 



2.4V-i'^ 
-J 




2.4V 



-twf 
-0.4V 



V 



4V 



\ 



10 



OTHER TIMINGS 



*: These values are doubled when CLK = 1 MHz. 
**: During Master Reset, CLK of more than 10 cycles are required. 
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Paramptpr 




Symbol 


Value 


Unit 




Min. 


Typ. 


Max. 


CLK Low Pulse Width 


^CDI 


230 




20000 


ns 


CLK High Pulse Width 


tcD2 


200 




20000 


ns 


STEP Pulse Width 


MFM 


^STP 


2* 






MS 


FM 


4* 






MS 


DIRC Setup Time 


^DIR 


12* 






MS 


MR Pulse Width'"* 


^MR 


50* 






MS 


TP Pulse Width 


t|P 


10* 






MS 


WF Pulse Width 


twF 


10* 






MS 


CLK Cycle Time 


tcYC 




0.5* 




MS 



IP 



WF 



MR 



CLK 



DIRC 



STEP 



OTHER TIMINGS 



O.SV^t 



-tlp- 



/0.8V 



O.SV^s. 



-twF- 



jK).8V 



o.svNt 



-tMR- 



3f0.8V 



2.0V\ 



— *CD1- 



-tCYC- 




tCD2- 



X 



2.0V 



STEP-IN 



/ 



A 



2.4V 
toiR 



STEP-OUT 
^0.4V 



£tSTP- 
. 



^DIR- 



X 



2.4V 



f0.4V \_ 
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PACKAGE DIMENSIONS 



40-LEAD CERAMIC (METAL SEAL) DUAL IN-LINE PACKAGE 
(CASE No.: DIP-4aC-A01l 



R.050(1.27l 

REF. 



--) 



INDEX 
AREA 



o 



.686114.86) 

.605(15.37) 

,5901 4.99) 
.610115.491 



-=4 

1.20)/ 



^r^ 



060(1.62)MAX 








.12013.05) 
.15013.81) 



.040{1.02) 
.06011.52] 



1.900I48.26)REF 



40-LEAD PLASTIC DUAL IN-LINE PACKAGE 
(CASE No. : DIP-40P-M01I 



inchei (millimeteri) 





nnnnnnnn cun nni-innnr-innn 




/^ ^~\^(EJECTOR MARK) 


INDEXs 


\ / 












UULJLJLJLJLJLJLJLJLJLJLJULJULJLJLJU 




2.045(51.941 




2.071 (52.601 



, 5331 13.54) 

.553(14.05) 

.590(14.99) 
.610(15.49] 



L 



i(0.20) ] 



.008(0, 
.014(0.36) 



-.090(2.29) MAX 




. 118(3. OOIMIN 



,020(0,51 )MIN 



Circuit (diagrams utilizing 
Fujitsu products are incluid- 
ed as a means of illustrating 
typical semiconductor appli- 
cations; consequently, com- 
plete information sufficient 
for construction purposes is 
not necessarily given. The 
information has been care- 
fully checked and is be- 
lieved to be entirely reliable. 
However, no responsibility 
is assumed for inaccuracies. 
Furthermore, such informa- 
tion does not convey to the 
purchaser of the semicon- 
ductor devices described 
herein any license under the 
patent rights of Fujitsu 
Limited or others. Fujitsu 
Limited reserves the right to 
change device specifications. 



FUJITSU LIMITED 

Commumcationi and Slectrcmici 

6-1, Marunouchi 2-chome, Chiyoda-ku, Tokyo 100, Japan 

Phone: National (03) 216-3211 International (Int'l Prefix) 81-3-216-3211 Telex: J22833 Cable: "FUJITSULIMITED TOKYO" 



For further information please contact: 

FUJITSU LIMITED 

Semiconductor Division: No. 18 Mori BIdg., 3-13, 2-chorne, Toranomon, Minato-l<u, Tokyo 105, Japan 

Phone: National (03) 502-0161 International (Int'l Prefix) 81-3-502-0161 Telex: 2224361 FTTOR J 
FUJITSU MICROELECTRONICS, INC.: 

2985 Kifer Roa(d, Santa Clara, CA95051, U.S.A. 

Phone: 408-727-1700 Telex: 910-338-0190 FUJITSU SNTA 
FUJITSU MIKROELEKTRONIK GmbH.: 

Arabella Center 9. OG./A 

Lyoner StralBe .44-48 D-6000 Frankfurt 71, F.R. Germany 

Phone: 0611/66 63 056 Telex: 0411 963 



Printed In Japan 0V2067-823C 
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Appendix E 
Osborne 1 System 
Specifications 



SIZE measured with case closed 
20.5 inches wide 
13 inches deep 
9 inches high 

WEIGHT 

24.5 lbs. (shipping weight 32 lbs.) 

PORTABILITY 

Leather handle for carrying 

When closed, unit is weatherproof 

Unit sized to fit under standard airline seat 

Power cord stows within case with cover secured by hook-and-loop 

plastic fasteners or hinged 
High-impact ABS plastic or injection molded case meets UL 94VO flame 

retardance specifications 

POWER CONSUMPTION 

110 or 220 volts 

37 watts max. 

Configurable through internal jumper to 230 vac, or through fuse card 

Switching power supply 

ENVIRONMENTAL 

Convection cooled; no fan 

Maximum operating ambient air temperature 85 degrees F 

Humidity — 95% relative, non-condensing 

Minimum operating ambient air temperature 32 degrees F 

SAFETY 

Three-wire grounded power plug 

Three primary circuit protection points 

Fuse integral to power supply 

Resettable or fused circuit breaker at power switch 

Thermal cutoff opens when internal temperature exceeds 150 degrees F 

(resets at 130 degrees F) 
Power supply shuts off under overload conditions 
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OSBORNE 1 TECHNICAL MANUAL 



CONTROLS 

69 key detachable keyboard, full-travel sloped keytops includes 12 key 

numeric keypad 
Power on-off switch in rear 
Reset pushbutton on front panel 
Brightness and contrast controls on front panel 

MAIN PC BOARD 

Processor ~ Z80A®, 4 Mhz CPU clock 

Memory size — 64K bytes programmable (RAM) 

4K read-only memory bank-switched 

59K of programmable memory available for software 
Memory access time — 250 nsec programmable memory 

350 nsec read-only memory 
Program in read-only memory executes without delay 
Programmable memory adds average delay times as follows: 

First Ml cycle — 188 nsec 

Subsequent consecutive Ml cycles — nsec 

Non-Ml cycles — 375 nsec 

DISPLAY SYSTEM 

4K byte memory-mapped display memory in top page of main memory 

9 bit wide display memory — 7 bit ASCII plus underline and half- 
intensity attributes 

Scrolling performed by hardware in vertical and horizontal directions 

Solid underline cursor 

White video on dark background 

24 lines of 52 characters visible at any time 

32 lines of 128 characters video memory over which screen may be 
moved 

Character set 

96 upper and lower case characters 
32 graphics characters 

INTERFACES 

Serial RS-232C 

1200 or 300 baud, selectable in software 

DTR (pin 20) handshaking input to control transmission spot rate 

Modem — 9 pin plug for use with external modem (DCE) 

Adapter allows connection of modem and printer simultaneously 

IEEE-488 (General Purpose instrumentation Bus) 
Controller ony, talker and listener 

Keyboard — connects to keyboard through 10 inch ribbon cable remov- 
able by user 

External video — drives video monitor as option (same format as 24 x 52) 

Battery adapter — allows operation with external battery pack 
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APPENDIX E OSBORNE 1 SYSTEM SPECIFICATIONS 



PERIPHERALS — SELF-CONTAINED 
Video monitor 

Size of video area 

3.55" horiz. 

2.63" vert. 
P4 phosphor (same as TV) 
Linearity 10% adjacent characters, 15% overall 
Display format 

24 lines 

52 characters 

10 scan lines per character line 

Cursor on lowest scan 
Timing 

64 microseconds per scan 

16.666 milliseconds per vertical sweep 

12 microseconds horizontal blanking 

1.28 milliseconds vertical blanking 

DISKS 

Media 

5.25 inch diskettes, single sided, soft sectored 
Storage provided for 25 diskettes max. 

40 tracks per diskette 

10 sectors per track 

256 bytes per sector 

Max. seek time 12 milliseconds track-to-track 

Head load time milliseconds 

Rotation time 200 milliseconds 

Recording standard — FM 

Controller type 1793 
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ROM/BIOS 1.3 



o 

o 



SORCIM aoax Assembler ver 3.5E <:/55/7= 59:92 Page 1 
SINGLE Density Monitor for Model 1 system. C:SDROHA .ASM 



*A8S 


0000 


EFFO 


*CODE 


EFFO 


0000 


*DATA 


EFFO 


0000 



o 

o 

3 



O 
o 



SINGLE Density Monitor 



;VER = 
;lable = 

:OATE 



REV A.O 
REV 1.3 
29 



; This rom has been modified to accept single or double density. All the disk driver have been 
Schanged. New valriables have been added which are: 



SAVTYP: 

BIT 
BIT 1 
BIT 2-3 = 
Added Dec. 21f8I by DEB. 



(Otl)Oouble density or single density l=single» O=double. 

«0,1)SIO£ SELECT 

(0-3IThe sector tenth 0=128t 1=256. 2=512f 3=1024. 



= 0000 
0000 = 0000 



; Density se lect (SELDEN) has been added to the disk drivers. This oroc senses the density of the 
;di3k and reports it by setting SAVTYP with density and sector size. It also reports the number of 
Jsectors on one track in regester B. 
:Added Jan. 5.82 by OEB. 

! There seems to be a problem in the timing of the RSEC AND WSEC routines. The problem shows up 
Swhen CP/H reads the disk one sector after another. The fix is to use RAOR only when the drive is 
•sleeted and not before every read or write. 
;Added Jan. 6>82 by DEB. 



•fHA of memory 



CCP 





ORG 





ALPUSH: macro 




PUSH 


AF 


PUSH 


BC 


PUSH 


DE 


PUSH 


HL 


PUSH 


IX 


PUSH 


lY 


ENDM 




ALLPOP: macro 




POP 


lY 


POP 


IX 


POP 


HL 


POP 


DE 


POP 


BC 


POP 


AF 


ENDM 





SCRCIVI B08X Assembler ver 
SINGLE Density Monitor for fodei 1 system. 



3.5e 



<:/55/7= 59:92 Page Z 
C:SDR0H4 .ASM 



;rom sections are: 



o 

O 
o 

3 



*[13 
*[2] 

*t5J 

«C7] 
«tRl 



RCM STANDARDS 
CPH BOOT 
CONSCL RaUTINES 
PIA ROUTINES 
SIA ROUTINES 
DISK ROUTINES 
FORHAT ROUTINE 
RAM LOCATIONS 



O 

o 

■5 



o 

o 



Monitor Main Loop* 



o 
o 

3 



SORCIM 808x Assembler ver 3.5E <:/55/7- 59:92 Page 3 

C5S0R0MA .ASM 



0000 

0002 C33600 

0005 



0005 




0006 


C9 


0007 




0007 




0008 




OOOA 


E0736FEF 


OOOE 


3199EF 


0011 




0019 


3E*9 



OOIB 3206EF 



OOIE 



*[1] 



OISOIM 
JMP 



BHON 



USER: 

lExit to user program from 'G* 

ei 

RET 
ILINT: 
•Here on unknown interrupt 

DI 



DISOIH 




STQ 


SP.IESTK 


LDK 


SP.ISTK 


ALPUSH 




LDK 


AtM* 


STO 


A.WPCHR 



icfisable OIM 
Sreset/restart 



command 
JExit from G command 



;save interrupted proo stack 
{insure stack in RAH 
;save al I registers 

;set prompt to inter level 



OOIE 


3A002e 


0021 


3A08EF 


0024 


B7 


0025 


C2DF00 


0028 




0030 


ED7B6FEF $ 


0034 




O03S 


C9 


0036 




0037 


31C1EF 


003A 


AF 


003B 


3217EF 


003E 


32EFEF 


0041 


3C 


0042 


32D0EF 


0045 


CD8000 


0048 


2100ED 


004B 


22EAEF 


004E 


210000 


0051 


2260EF 


0054 


113601 


0057 


C 097 01 


005A 


180E *006A$ 


005C 


= 0066 


0066 




0067 


C33600 



EXITI: 
Exit interrupt code via exiting to RAH and 

then enable or disable ROM code depending on 
the value contained in ROMRAH cell. 



BHON: 



LD 

LO 

OR 

JNZ 

ALLPOP 

LO 

El 

RET 

Di 

LDK 

XRA 

STO 

STO 

INC 

STO 

CALL 

LDK 

STO 

LDK 

STO 

LOK 

CALL 

JR 

ORG 

01 

JMP 



A.H.VIO 

A. ROMRAH 

A 

RQMJPl 

SPiIESTK 



SPtROMSTK 

A 

AiSDISK 

AfVRTOFF 

A 

A.SAVTYP 

HINT 



Sclear interrupt 

;tf return to RAM. CPH 
Sget users stack back 



!set disk to drive 
;OFFSET TO ZERO USED IN COUT 



;SET SAVTYP TO SINGEL 
•Initialize hardware 

HL.lhigh HRAM)*100h 

HL.SSAVE Unitialize User stack in ram 

HL.O 

Hi.LDSEL ;clear select and last track 

OE.IMSG 

OSTR ;Outout initial message 

BMONl {continue 

NMIA 



BHON 



:nhi 



o 

o 



SORCIM 808x Asseitibler ver 3.56 



Honjtor Hain Loop* 



<:/55/7= 59S92 Page 4 
CtSDRQMA .ASM 



Main start up for Honjtor. 
Get 1st user response. 



006A C07E03 



O 
o 

3 



O 
o 



006D 


f=E0O 


005F 


21C7EF 


0072 


OEOO 


0074 


71 


0075 


CA6802 


0078 


34 


0079 


FE22 


007B 


CA6a02 


007E 


1886 *0036t 



CALL 


CI 


CMP 


CR 


LK 


HL.DSKSUP 


LK 


CO 


STO 


c.thn 


J2 


CBDOT 


INC 


[hn 


CMP 


iit» 


JZ 


C80DT 


JR 


BMON 



:Get next character 

:disk swap eel I 

:boot from At 

iset to A=A, 8=8 

;if cold boot 

:sMap drives! A=B» B=A 

;if cold boot off of a 



o 

o 



Honitor Main Loopi 
0080 



SDRCIM 808x Assembler ver 3.5E <:/55/7= 59:92 Page 5 

C:SDROMA .ASH 

HINTS 

•Initialize all dependent hardware. 

; ENTRY 

SNone. 







;exit 








:ai I 


hardware 


nitialized. 






;Set 


flag indicating in ROM 


0080 






PRQC 




0080 






ENAROH 




0089 






DISOIH 




0088 


211F07 




LDK 


HL.GKEY 


OOSE 


22F8EF 




STO 


HL,lNTBL+{*«2) 


0091 


ED5E $ 




IM2 




0093 


3EEF 




LOK 


A. high INT8L 


0095 


ED47 $ 




MOV 


I. A 






; 


Initia 


ize keyboard 


0097 


AF 




XRA 


A 


0096 


32F0EF 




STO 


A.OEFFOH 


009B 


326BEF 




STO 


A.SELCNT 


009E 


325EEF 




STO 


A.LKEY 


OOAl 


3207EF 




STO 


A,ECHOP 


00A4 


3250EF 




STO 


A.ESCH 


00A7 


210«EF 




LOK 


HLfKEYLST 


OOAA 


0506 




LDK 


9tKL_LEN«KLe_LEN 


OOAC 




:ls 






OOAC 


77 




STO 


A.tHL] 


OOAO 


23 




INC 


HL 


OOAt 


lOFC "OOAC* 




OJNZ 


:l 


OOBO 


2F 




CMA 




OOBl 


3263EF 




STO 


A.IOAY 


00B4 


3259EF 




STO 


A.KEYLCK 


00 87 


3E80 




LDK 


A<VLL 


00B9 


326CEF 




STO 


A.LLIHIT 



;disable DIM bit 



Sset interrupt page 



•clear bell timer ceil 

tclear last Key cell 

•clear echo to list dev 

•clear ESC hold flag 



;set date invalid for SETUP. COM 
•indicate NOT locked 



iset itiax 1 ine limit 



Now function PIA to set starting address 
and continue to move display window over 
the first display line. 
Set cursor as 1-40 on 1st line. 



OOBC CD4F09 
OOBF OEEA 
OOCl CD6409 



00C4 AF 
00C5 4F 
00C6 CD7109 



O0C9 OEOl 
OOCB CD7E09 



CALL 


SPAO 


LDK 


C.VFLO 


CALL 


OP AD 



•set up for output 

;set for -10 char position AND DOUBLE DENSITY 



Set beginning line to 



XRA 


A 


MOV 


C.A 


CALL 


OPBD 



Sset 1 ine 



Intial ize IEEE port 



tdk 
call 



c.l 
i e.co 



OOCE 0E55 



Reset-Master clear the SIO (ACIA) 

LK C<SI.S16 iselect 16x clock for 1200 baud 



o 
o 



o 

o 

3 



O 
o 



Monitor Main Loop* 
OODO C0F60A 



O0D3 3602 
00D5 3213EF 



00D8 3E3E 

OOOA 3206EF 
OODO 

OOOE C9 
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C:SDR0»1A .ASH 

CALL SIRST :reset 

Set default seek to as defined by systext 



LOK 
STC 



AtScEKTM 
AtSEKOEL 



Set default prompt char 



LDK 


AtPHCHR 


STO 


A.MPCHR 


€1 




RET 





Jdefined from systext 
;set seeh step rate 



;set UD default 
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O Monitor Main Loop. CjSOROMA .ftSH 



T3 

•< 



O 

O 

o 

3 

T3 



O 
O 



OOOF 113316 romjpl: Idk de.l633h Joffset in bios Jump table 

00E2 1803 *00E7$ jr biojp 

ooe* 113616 rorajo2: idk detl636h ;offset in bios Ju-np taole 

0067 2A02EF biojp: Id hl.ccpadr 

00€A 19 .add hl.de ;farm address 

00E8 E9 Jjnp thi] 



nonitor Main Loop* 

ooec = 0100 
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C:SDRQMA .ASM 

ORG lOOh 



0100 


C36802 


0103 


C3AB02 


0106 


C37103 


0109 


C37e03 


OlOC 


C31004 


QIOF 


C31C0B 


0112 


C31C0B 


0115 


C3030B 



Oils 


C3400B 


OllB 


C9 


OllE 


C3750C 


0121 


C3700C 


0124 


C3EC0C 


0127 


C35B0S 


012A 


C36D0B 


0120 


C3130B 


0130 


C380OB 


0133 


C3DF00 


0136 


C3E400 


0139 


C33F0E 



ROM JUMP TABLE 


CBIOS 


s 


SC 


= 


JMP 


CBOQT 


JMP 


WBOOT 


JHP 


SKEY 


JMP 


CI 


JMP 


COUT 


JHP 


LIST 


JMP 


LIST 


JMP 


READER 


Disk 


I/O 


JMP 


RDRV 


RET ! 


NOP ! NOP 


JMP 


READ 


JHP 


WRITE 


JMP 


RADR 


JMP 


RSEC 


JMP 


WSEC 


JMP 


SLST 


JMP 


SENDEN 


JMP 


ROMJPi 


JMP 


R0HJP2 


JMP 


FORMAT 



Jmos used mainly by CBIOS 
Jmps used mainly by SuoerCalc 



:CBIOS 

:cBios 
;c3ios 
:CBios 
;CBios 
;cBios 
;cBios 
;cBios 



CBIOS 
CBIOS 



CBIOS 
CBIOS 
CBIOS 
CBIOS 
CBIOS 
CBIOS 
CBIOS 



cold boot 
warm boot 
keyboard status 
keyboard input 
console outout 
I i St output 
punch outout 
reader input 



HOME 

SELECT DISK 

READ SECTOR 

WRITE SECTOR 

READ SECTOR ANY SECTOR HEADER 

DISK SECTOR READ 

DISK SECTOR WRITE 

List device status 

SENSE THE DENSITY OF DRIVE 



FORMATING ROUTINE 



IEEE 



013C 


C3F60A 


013F 


C37E09 


0142 


C3C109 


0145 


C3D409 


0143 


C3E009 


014B 


C3200A 


014E 


C3430A 


0151 


C3850A 


0154 


C3E10A 



0157 
015A 
0150 



CvF105 
C30507 
C3E906 



0160 


C3200E 


0163 


C30AOE 


0156 


C3F703 


0169 


C31A0C 


016C 


C3390C 


016F 


C34D0C 


0172 


C3510C 


0175 


C3640D 


0178 


C3330D 


017B 


C3490D 



JHP 


SIRST 


JMP 


IE. CO 


JMP 


IE. SI 


JMP 


IE. GTS 


JMP 


lE.TC 


JMP 


lE.OlM 


JMP 


lE.OOM 


JMP 


lE.IDH 


JMP 


lE.PP 


SuperCa 


Ic 


JMP 


VLOOR 


JMP 


VLOIR 


JMP 


STOOTM 


DISK I/O 


JMP 


DMAWRT 


JMP 


DMARO 


JMP 


HOME 


JMP 


SEEK 


JMP 


STEP 


JMP 


STEPIN 


JMP 


STEPOUT 


JMP 


FOR [NT 


JHP 


READTRK 


JMP 


FMTTRK 



scsios 
:cBios 
;CBios 
:cBias 
;c3ios 
:cBios 
;C3ios 
;cBios 
;C3ios 



;sc 
;sc 
;sc 



SIO reset 

IEEE Control Out 

Status In 

Go To Standby 

Take Control 

Outout Interface Message 

Output Device Message 

Input Device Message 

Paral lei Pol I 



VIDEO BLOCK MOVE DEC 
VIDEO BLOCK MOVE INC 
STQ reg 3 IN [HL] 



DMA WRITE TO CONTROLER 

DMA READ FROM CONTROLER 

HOME DISK DRIVE 

SEEK TO TRACK 

STEP SAME DIRECTION 

STEP IN 

STEP OUT 

FORCE INTtRUPT 

READ TRACK 

Forn;at one track 
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O Monitor Ham Loop. C:S0R0MA ,ASM 

■D 

=■ 017E CaA-fOD JMP SELDRV ; SELECT DRIVE 

- SJ!f "280B JMP ACISTAT ICBIOS SERIAL PORT STATUS 

_- _-. ^„^ ^u.^iv-v , ac) IKALU KtbtSlER IN CCNTROLER CHIP WITH VALUE IN SAVTRK 



O 

o 

3 

T3 



O 
O 



o 

o 
■o 



Monitor Main Loop. 
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CSSOROMA .ASM 



a 


0187 

0189 

, 0193 


ODOA 

424F4F54Z0 

AO 


EMBOOT! DB 
OB 
DC 


CRfLF 

•BOOT ERROR 

• a 


o 


0194 




EBDOT: 
:aODT ERROR 


MESSAGE ROUTINE 


i 






; ENTRY 

;none 




O 

o 

3 


0194 
0194 


118701 


PR DC 
LOK 


DE. EMBOOT 


9 











:HERE on BOOT ERROR 
:FALL THROUGH TO CSTR 



o 

o 

3 

T3 



Monitor Main Loop* 
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CtSOROHA .ASM 



0197 



OSTR: 

JCUTPUT STRING TO CONSOLE 

;N0TE: OSTR RECOGNIZES 7F AS AN ESCAPE SEQUENCE TO REPEAT CHAR N TIMES. FORMAT IS: 7F, REPEAT COUNT, CHAR 
; ENTRY 



;0E 



FWA OF SOURCE 



019T 




PROC 




0197 


lA 


LD 


AtCDEl 


0198 


67 


OR 


A 


0199 


F5 


PUSH 


AF 


019A 


E67F 


AND 


D7FH 


019C 


FE7F 


CMP 


07FH 


019E 


4F 


MOV 


C,A 


019F 


200C *01A0t 


JRNZ 


:4 


OlAl 


13 


INC 


DE 


01A2 


lA 


LD 


A.tDEl 


01A3 


30 


DEC 


A 


01A4 


47 


MOV 


B,A 


OlAS 


13 


INC 


DE 


01A6 


lA 


LO 


A,tOE] 


01A7 


4F 


MOV 


C,A 


OlAS 


CD1004 :2: 


CALL 


COUT 


OlAB 


lOFB "OlASS 


DJNZ 


:2 


OlAD 


C01004 :4: 


CALL 


COUT 


OIBO 


13 


INC 


DE 


0181 


Fl 


POP 


AF 


01B2 


F29701 


JP 


OSTR 


01B5 


C9 


RET 





;IF NOT REPEAT 
:REPEAT COUNT 

;get repeat char 
;ouTPUT char 

!IF NOT DONE 
;OUTPUT IT 

11 F NOT DONE 
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9 


HONIT! 


DR ROM CONSTANTS 


• 






2. 


01B6 


IHSGt 






(D 

3- 


0186 


lAOAOAOAOA 


DB 


•Z"-40h.lf tif.lf .If 




® 


OIBB 


7F0B20 


DB 


07Fh, 11. • ' 




to 


OIBE 


1867 


08 


ESC.VSGH 




to 


OICO 


11 


OB 


«Q'-40h 




o 


OlCl 


7F1817 


08 


07Fh. 24, •W-40h 




01 


OIC* 


05 


08 


■E'-40h 




5 

CD 


01C5 


1847 


DB 


ESC.VEGH 




o 

O 


0iC7 


ODOA 


DB 


cr.lf 




B 


01C9 


7F0B20 


OB 


07Fh, 11. • • 




c 
If 


OICC 


1867011847 


DB 


ESC.VSGH.l. ESC.VEGH 




a 


OlOi 


2020 


DB 


• « 




g 


0103 


186C 


DB 


ESC.'l • 




"5 


0105 


4F53424F52 


08 


■OSBORNE System One.' 




o 
3 


01E8 


1B6D 


08 


ESC.'m' 




o 

3 


OlEA 


202020 


DB 


« « 




OlEO 


1867041847 


DB 


ESC.VSGH, 4, ESC.VEGH 






01F2 


OOOA 


08 


cr.lf 






OlFA 


7F0820 


08 


07Fh. 11. • • 






01F7 


1867 


DB 


ESC.VSGH 






01F9 


01 


DB 


•A*-40h 






OlFA 


7F1820 


DB 


07Fh.24,' • 






OlFD 


04 


DB 


•D"-40h 






OlFE 


1B47 


DB 


ESC.VEGH 






020C 


ODOA 


DB 


cr.lf 






0202 


7F0B20 


OB 


07Fh. 11. • • 






0205 


1867 


OS 


ESC.VSGH 






0207 


01 


08 


•A'-40h 






0208 


1829 


DB 


ESC.')' 






020A 


2052657620 


DB 


' Rev 1.3 C. 1982 OCC 


* 




0222 


1B28 


DB 


ESC.'C • 






0224 


04 


DB 


•0'-40h 






0225 


1847 


DB 


ESC.VEGH 






0227 


ODOA 


08 


CT.If 






0229 


7F0B20 


DB 


07Fh. 11. " ' 






022C 


1867 


DB 


ESC.VSGH 






022E 


lA 


08 


•Z"-40h 






022F 


7F1818 


08 


07Fh, 24. •X'-40h 






0232 


03 


DB 


'C'-40h 






0233 


1B47 


08 


ESC.VEGH 






0235 


ODOAOAOA 


03 


cr.lf. If. If 






0239 


7F0420 


08 


07Fh. 4, • • 






023C 


4966736572 


08 


• Insert disk in Or ive ' 






0251 


1B6C 


DB 


ESC 1' 






0253 


41 


08 


'A' 






0254 


1B60 


OB 


ESC.'m' 






0256 


20616E6420 


DB 


' and press RETURN' 






0267 


AE 


DC 


f ^ • 
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C:SOROHA .ASH 



o 
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Boot CP/M from disk. CsSDROMA .ASM 

«t23 



O 

o 

3 



O 



The CBOOT entry point gets control froii the cold start loader and is responsible for the basic 
system initialization. This includes outputting a sign-on message and initializing the following 
page zero locations: 

0*1.2: Set to the warmstart jump vector. 

3: Set to the initial lOBYTE value. 

4: Default and logged on drive. 

5»6.7: Set to a jump to 8D0S. 

The WBOOT entry point gets control when a warm start occurs, a *C from the console* a Jump to 
BOOS {function 0»* or a jump to location zero. The WBOOT routine reads the CCP and BOOS from the 
appropriate disk sectors. 

WBOOT must also re-ini t ja I i ze locations 0*1*2 and 5*6*7. The WBOOT routines exits with the C 
register set to the appropriate drive selection value. The exit address is to the CCP routine. 

Single Density Disk layout Definition: 

Track 

1 thru 8 CCP 2k 

9 thru 10 BOOS 
Track 1 

1 thru 10 BOOS 
Track 2 

1 thru 2 BOOS 3.5k 

3 thru 10 C8I0S 2k 



3 o 
0268 



0263 



C P / H 
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from disk. C:SDROM* .ASM 



CBOOT: 
;eNTR¥ 

:c 

;exit 
:a 



drive to boot from 
DRIVE TO SOOT FROM 



Proc 



o 
o 

3 






»SET 


"SOISK" 


AND "SAVTYP" 




■o 

c 
a 

o 


C268 
0269 


79 
3217EF 




MOV 
STO 


A.C 

A. SOISK 


;SET DRIVE 


o 
1 
S. 


025C 
26F 


CD8008 
2805 '0276S 


:ls 


CALL 
JRZ 


SENDEN 
:2 


;DeTERHINE DENSITY 
:IF GOOD 


3 


0271 
027* 


CD9401 
18F6 *026C$ 




CALL 

JR 


EBCOT 
:1 


JPRINT ERROR 



0276 


2100D0 


0279 


220FEF 


027C 


AF 


0270 


3215EF 


0280 


3C 


0281 


3214EF 


0284 


47 


028S 


C05B0B 


0288 


2805 »02BF* 


028A 


C09401 


0280 


18ED *027C$ 


028F 


3A0200 


0292 


0603 


0294 


2E00 


0296 


67 



aREAD AND SET FBA OF CCP 



:2: 



LDK 


HL.ODOOOH 


STO 


HLtDMADR 


XRA 


A 


STO 


A.SAVTRK 


INC 


A 


STO 


AtSAVSEC 


MOV 


B»A 


CALL 


RSEC 


JRI 


:4 


CALL 


EBCOT 


JR 


:3 


LO 


A.00002H 


SUB 


3 


LDK 


L.O 


MOV 


HtA 



SSET DMA 

•set track 

Sset sector 

;READ SECTOR ONE 
:IF GOOD 

:PRINT ERROR 

;get ccp address/lOOfi + 3 



*SET NUMBER OF 128 BYTE BLOCKS TO READ FOR SOOT 

:ccp/Boas/CBios 



5DRIVE TO BOOT FROM 

;SAVE FWA FOR "CCPAOR" 
;boot system 



0297 


06 3C 


LOK 
*READ SYSTEM 


Bt60 


0299 


3AnEF 


LD 


A, SOISK 


029C 


F5 


PUSH 


AF 


0290 


E5 


PUSH 


HL 


029E 


CD8302 


CALL 


BCPH 


02A1 


El 


POP 


HL 


02A2 


Fl 


POP 


AF 



*JUMP SYSTEM 



02A3 


22D2EF 


02A6 


110016 


02A9 


19 


02AA 


E9 



STO 


HLtCCPAOR 




LDK 


OE.1600h 


;offset for bios 


ADD 


HL,DE 


:address of bios in hi 


JMP 


tHL3 


;enter com 



o 

o 



SCRCIH 808x Assembter ver 
3oot CP/K from disk. 

02AB WBOOT: 

;entry 

:NONf 



3.5E 
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CISOROHA .ASM 



;exit 

*NQTe* 



THIS ROUTINE DOES NOT EXIT. IT ONLY SETS PARAimTERS FOR BCPM: 



O 



3 

T3 



*:a 

*5B 

*;hl 



DRIVE TO BOOT FROM 

NUMBER OF 128 BYTE BLOCKS TO READ FOR BOOT 

DMA ADDR FOR CCP 



O 
o 



02AB 

02A8 062C 

02A0 3A0400 

O2B0 2AD2EF 



Proc 

LOK 

LD 

LD 



Bt44 

A.CDISK 

HL.CCPADR 



;CCP/BDOS and don't read CBIQS 
JCurrent logged in drive 



a o o 

02B3 



C P / M 



0283 



02B3 
0286 
0239 
02BB 
02Be 
028F 
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from disk. CSSOROMA .ASH 

BCPM: 

;eoot CPM from disk 

:entry 

;A = DRIVE TO BOOT FROM 

•B = NUMBER OF 128 BYTE BLOCKS TO READ FOR BOOT 

;hl = DMA AODR FOR CCP 

:exit 
:NaNE 
;loops on error 

PROC 
*SET "SDISK". "OMADR" ANO "SAVSEC" 



3217EF 

220FeF 

3E01 

321«EF 

3D 

3200EF 



STD 
STD 
LDK 
STQ 
DEC 
STO 



A. SDISK 

HLtDHADR 

A.l 

A.SAVSEC 

A 

A.TEH 



;Set drive to boot from 
SSET DMA 



02C2 C5 



•set sector 
:MAKE TEH ZERO 
«SET "SAVTYP" AND GET NUMBER OF SECTORS PER TRACK 
PUSH BC 

;deter«ine density 

:IF GOOD 
;PRINT ERROR 



02C3 
2C6 


C0800B 
2305 •02CDt 


:RL0OPs 


CALL 

JRZ 


SENDEN 
:GQ0D 


0ZC3 
OZCB 


CD9+01 
18F6 »02C3t 




CALL 

JR 


EBOOT 
sRLOOP 


OZCO 
02CE 


Dl 
C5 


J good: 


POP 
PUSH 


OE 
BC 



*SET NUHBER OF SECTORS TO READ 



02CF 


3A00EF 


LD 


A, SAVTYP 


0202 


C33F » 


SRL 


A 


0204 


C83F » 


SRL 


A 


0206 


E603 


ANI 


0000_0011 


0208 


FEOO 


CMP 





020A 


2818 ''02F*t 


JRZ 


:l 



;GET NUMBER TO OEVIOE 3Y 



02DC 


47 






HOV 


B.A 


02DD 


3E01 






LDK 


A,l 


02DF 


CB27 


$ 


rlLDDP: 


SLA 


A 


02E1 


lOFC 


«02DF$ 




DJNZ 


:1L0CP 


0ZE3 


47 






MOV 


B.A 


02E* 


7* 






HOV 


A.D 


02E5 


1600 






LDK 


D.O 


02E7 


90 




:2L0CP: 


SUB 


S 


02Ea 


08 


S 




EX 


AF 


02E9 


14 






INC 





02EA 


08 


$ 




EX 


AF 


02EB 


2807 


"D2F4S 




JRZ 


:l 


02ED 


30F8 


*02E7» 




JRNC 


:2L0DP 



:D=NUMeER OF 128 BYTE BLOCKS 

SSAVE NUMBER OF SECTORS IN ONE TRACK 



;A=NUMBER of BYTES IN ONE S£CTOR(0-3) 
;IF 128 BYTES SECTORS 

ZB^NUHBER OF BYTES IN ONE SECTOR! 1-3) 

;times two 



;number to divide by 

;A=NUHB£R of 128 byte SLOCKS 

:subtrack with divisor 
;save flogs 

ICOUNT 

;restqre flags 

:!F rezult is zero (NO partial sectors) 

:locp 



o 

o 



Boot 
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o 

O 

o 

3 

T3 



O 
O 



02EF 


ED4A 


02F1 


3200eF 


02F* 


CI 


02F5 


4A 



:l! 



NFG 
STO 



POP 
HOV 



A 

a.Veh 

BC 
C<0 



12 CO,*!P 

5SAVE REMAINDER AND INDICATE A PARTIAL SECTOR 

;e=NUH3ER OF SECTORS IN ONE TRACK 
;C = NUH3ER OF SECTORS TO READ 



*R£AD SYSTEM 



02F5 
02F7 



02FA 
02FB 
02FC 



AF 
3215EF 



79 
B7 
2008 ^0306$ 



STLDOP! 



XRA 
STO 



;a=o 

;S£T TRACK 



030A 
030C 
0300 



E044 

47 

OEOO 



0310 
0320 



0322 
0325 



CD5B0B 

2805 *C327S 

C09401 

1BF6 *031D» 



:3: 



HOV 
OR A 
JRNZ 



A.C 

A 

:5 



02FE 


3A00EF 


LD 


A.TEM 


0301 


97 


ORA 


A 


0302 


2358 *035C$ 


JRZ 


:4 


0304 


182A *0330S 


JR 


:RLS 



06 


90 


:55 


SUB 


B 


07 


4F 




MOV 


C.A 


08 


3005 "OSOFS 




JRNC 


:2 



030F 


3A00feF :2: 


LD 


AtTEM 


0312 


B7 


ORA 


A 


0313 


2808 *031DS 


JRZ 


:3 


0315 


AF 


XRA 


A 


0316 


Bl 


ORA 


C 


0317 


2004 *031D$ 


JRNZ 


:3 



0319 


78 


MOV 


A.B 


031A 


3D 


DEC 


A 


031B 


2813 »0330$ 


JRZ 


:RLS 



AtSAVTRK 
;CHECK FOR ALL SECTORS READ 

;SECTORS TO READ 
;IF C IS NOT ZERO CONTINUE 
:CHECK FOR NO PARCIAL SECTORS 



:your done if c=o and tem=o 
;reao one more parcial sector 

:UPDATE NUMBER OF SECTORS LEFT TO READ 

;SU8TRACK SECTORS IN ONE TRACK 

;SAVE REMAINING SECTORS TO READ 

!A>B MORE THAN ONE TRACK LEFT TO READ 

;IF THIS IS LAST TRACK ZERO NUMBER OF SECTORS LEFT TO READ 

;2 COMP 

;read all the remaining sectors 
:sTOP after this read 

;CHECK FOR NONZERO VALUE IN TEH AND THE LAST SECTOR TO READ 



;iF TEM IS ZERO SKIP THIS 



SIF REG C IS NOT ZERO SKIP THIStNCT LAST TRACK) 
JREAD CNE LESS THAN THE LAST SECTOR 



;a=b-i 

jqnly one sector left to read 



iREAD IBC IS SAVED) 

:IF GOOD 

[REPORT ERROR 



NEG 


A 


HOV 


B.A 


LDK 


CtO 



:REA0 ONE TRACK 



CALL 

JRZ 



CALL 
JR 



RSEC 
:G00 



E800T 
;3 



o 

o 

T3 



O 
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;SET DMA 









:UPOATE 


DMA 


0327 


220FEF 


:G00: 


STO 
;UPDATE 


HL.DMADR 
TRACK 


032A 

032D 
032E 


3A15EF 

3C 

18C7 *02F7$ 




LD 

INC 

JR 


A.SAVTRK 

A 

:TL0CP 






*REAO 


A PARCIAL 


SECTOR 


0330 


E5 


:RLS: 


PUSH 


HL 


0331 
0334 


2180EA 
220FEF 




LCK 
STO 


HLtOEASOH 
HL.3M40R 


0337 
033A 


2115EF 
35 




LDK 
DEC 


HL.SAVTRK 
tHL] 



;track loop 



;save adoress to write to 
;aodress of host suffer in bios 

;SET DMA 



;savtrk 
:read sector in host buff 



SAVTRK 



033B 
033D 
0340 

0342 
0345 



0601 
CD750C 
2805 "0347$ 

C09401 
16F5 *033D» 



:3L00P: 



LDK B.l 
CALL READ 
JRZ :G0 



CALL 
JR 



EBCOT 

:3LaOP 



;REA3 ONE SECTOR 
;IF GOOD 

:report error 



0347 


3A0OEF 


:G0: 


LO 


A.TEM 


034A 


47 




MOV 


BtA 


034S 


210000 




LDK 


HLtO 


034E 


118000 




LDK 


D£,128 


0351 


19 


:4LC0P: 


AOO 


HLiDE 


0352 


lOFD »0351$ 




DJNZ 


:4L00P 


0354 


E5 




PUSH 


HL 


0355 


CI 




POP 


BC 



;SET NUMBER OF BYTES TO TRANSFER 

;B=NUM9ER of 128 BYTE BLOCK TO TRANSFER 



:TRANSF£R BYTES 



0356 


2180EA 


0359 


01 


035A 


£080 



LDK 
POP 
LDIR 



hl.oeasoh 

DE 



:3C=NUM3ER OF BYTES TD TRANSFER 



;SCURCE 

;destination 

;move 



035C 


2150EF 


035F 


110700 


0352 


CD3D09 


0365 


3EFF 


0367 


3255EF 


036A 


3E7F 


035C 


326EEF 


036F 


AF 


0370 


C9 



*CLeAR 
:4: 



SUFFERS SET PARR. AND RETURN TO SYSTEM 

LOK HL.HSTACT 

LDK DE.(L0GSEC-HSTACT)+1 

CALL FILLZ ;clear Host BIOS cells 

LDK AfOFFh 

STO A.UNASEC 

LDK A.VLL-1 

STO A.LOTRK ?set other drive NOT int 

XRA A :CIear error indicator 

RET 



o 

o 

T3 



SORCIH 308x Assembler ver 
Keyboard and Console Routines. 

*t3J 



3.5E 



<!/55/7= 59:92 Page 19 
CiSDROWA .ASH 



O 
o 

B 



O 
o 





« 


Assemb 


ly constant 




= 0001 


3KEY 


= 


1 




Sproduction keyboard 




♦ 


Control 


1 keys 




= 0007 


CBELL 


= 


•G'- 


-40h 


;Ring the Bel 1 


= OOOB 


MCUP 


s 


•K'-40h 


JMove cursor up 


= OOOA 


HCDCWN 


s 


LF 




jMove cursor down 


= 0008 


MCLEFT 


= 


BKS 




;Move cursor left 


= OOOC 


HCRIGH 


= 


•L"- 


-40h 


tMove cursor right 


= OOIA 


VCLRS 


= 


■z*- 


-40h 


ICIear and home cursor 


= OOIE 


VHDME 


- 


f*«- 


-40h 


;Home Cursor 




* 


Escape 


keys 






= 0023 


VLOCK: 


s 


•#• 




;Lock Keyboard 


= 0022 


VUNLK 


= 


« H 1 




•Unlock Keyboard 


= 0030 


VCAD: 


=: 


• = « 




;Cursor Addressing 


= 0053 


VSAO: 


s 


•s* 




{Screen Addressing 


= 0051 


VINC: 


= 


•Q" 




; Insert Char 


= 0057 


VOELC: 


s 


'W 




;Oelete char 


= 00*5 


VINL: 


= 


'E' 




JInsert line 


= 0052 


VDELL: 


= 


•R" 




sOelete line 


= 0054 


VCEOi: 


= 


•T' 




;CIear to end of 1 ine 


= 0029 


VSKI; 


s 


. J. 




SStart half intensity 


= 0028 


VEHI: 


= 


•{• 




Jend 


= 006C 


VSULs 


= 


■1' 




SStart under I ine 


= 0060 


VEUU: 


= 


•ir* 




;end 


= 0067 


VSGH: 


= 


•g. 




;Start graphics 


= 0047 


VEGH: 
: ARROW 


KEYS 


•G' 




;End 


- OOSA 


UP 


= 


8AH 






= 008B 


RIGHT 


= 


8BH 






= 00 8C 


DOWN 


=s 


8CH 






= 0080 


LEFT 


= 


8DH 







o 

o 



o 

o 

3 
•o 
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CSSOROHA .ASH 



0371 



0371 3A59EF 

037* 97 

0375 C8 

0376 3ASeEF 
0379 87 
037A C8 
0376 F6FF 
037D C9 



SKEY: 

;Get status of keyboard 

SEXIT 

;Cblt set if no data ready 

LO A.KEYLCK 

OR A 

RZ 

LD A.LKEY 

ORA A 

RZ 

OR I OFFH 

RET 



;if locked keyboard 
:CHECK FOR ZERO 

;IF NOT ZERO HAKE OFFH 
;IF DATA 
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3 



037E 




ci; 






0375 




RKEY: 










iRead 


next key 


from keyboard 






sexiT 










;a 


= 


last key 


037E 






PROC 




037e 


C07103 




CALL 


SKEY 


0381 


28F3 "0376$ 




JRZ 


RKEY 


03S3 






01 




0384 


3A5EEF 




LD 


A.LKEY 


0387 


4F 




MOV 


C»A 


0388 


AF 




XRA 


A 


0389 


325EEF 




STO 


A.LKEY 


038C 


79 




MOV 


AtC 


0380 






EI 




038E 


C9 




RET 





O 0381 2BF3 -037E$ JRZ RKEY : i f NO data 

o 



;GET CHARACTER 



g C389 325EEF STO A.LKEY ;clear key from hold 

■D 



o Keyboard and Console Routines* 

o 
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CtSORQMA .ASM 



03aF 




NORM: 










: Normal 


ize to 


UPPER case 






JENTRY 










:a 


= 


char 






SEXIT 










:a 


= 


CHAR 


03BF 


FE61 




CMP 


•a* 


0391 


P3 




RC 




0392 


FE73 




CMP 


'z' + l 


0394 


00 




RNC 




0395 


D620 




SUI 


'a'-'A' 


0397 


C9 




RET 






= 0020 


REPC 


= 


45 




= 0005 


REPK 


= 


5 



; I f upper 

;if not lower 



O 

5 _ „„,n Dcpp, = 45 Sinitial reo delay 



:repeat constant 



o 

o 

T3 
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o 
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0398 



0398 




0398 


216BEF 


0398 


AF 


039C 


86 


039D 


280C *03A8$ 


03 9F 


35 


3A0 


2009 *03ABt 


03A2 


3A62EF 


03A5 


E6DF 


03A7 


«F 


03A8 


CD7109 


03AB 




03AB 


28 


03AC 


7E 


03AD 


87 


03AE 


C8 


03AF 


35 


0380 


CC360E 


0383 


C9 



UPTIM; 

»Routirie checKs 
•checks to see i 
;shut off bel I. 

Proc 

LDK 

XOR 

OR 

JRZ 

DEC 

JRNZ 

LO 

AND 

HOV 

CALL 
:2: 

DEC 

LD 

OR 

RZ 

DEC 

CZ 

RET 



10 see IT zne disk drive motor should be turned off by updating DACTIVE. ..Routine ALSO 
f bell is currently ringing: if so. decrement counter. If counter turns zero. 



HL.3ELCNT 

A 



thi] 

:2 

Chi] 

:2 

A.PIABD 

H01_llllb 

C,A 

CPBD 

HL 

A.ChN 

A 

thl3 
DORV 



;ce I I =zero ? 

: i f bel I now off 

;...beU is on. decrement counter 

;if bell should stay on awhile yet 



;c lear bel I bit 



:hl => OACTVE 



;RETURN if inactive 

;reset delay 

: i f deselect dr i ve 



SQRCIM 803x Assembler ver 3.5E <s/55/7= 59:92 Page 2* 

Keyboard and Consols Routines. C:SORQMA .ASH 

: Bit definitions for ESCH flag byte 

; Note Sit 7 is currently free. 

64 ;B6= extegting X-coordinate 

32 ;a5= Screen/Cursor Addressing 

16 i84= expegting address-chr 

8 ;83=Slast char was ESC 

4 ;B2= Underline mode 

- -WW. w, 2 581= Half Intensity mode 

= 0001 eF_GR: = 1 ;B0= Graphics mode 

1 = 0007 EF_HSK: = EF_l)N+EF_HA + EF_GR ! Mask to get mode. 
c 

© 

O 

o 



0040 


EF_X: 


0020 


EF_SCR: 


0010 


EF ADR: 


0008 


EF_ESC: 


0004 


EF_UN: 


0002 


EF_HA: 


0001 


EF GR: 


0007 


EF HSK: 



o 

o 
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s 


ajS4 




CSCHT3S 




g 


03B4 


6704 


OW 


VNORM 


9 


03B6 


8105 


DW 


V6RAPH 


03B8 


9504 


DM 


VHALF 


O 


03BA 


9904 


DW 


VHA GR 


1 


03BC 


8704 


OU 


VUNDER 


o 


0386 


8804 


OW 


VUN.GR 


o 

3 


O3C0 


8F04 


OW 


VUN_HA 


T3 


03C2 


9304 


DW 


VUN_HA_GR 












? 










o 











Vector (branch) table for video output mode selection 
controlled by ESCH mode 



to No rival mode 

•1 Graphics mode 

;2 Half intensity mode 

53 Half and graphics 

14 Under I ine mode 

55 Under and graphics 

56 Under and half intensity 

;7 Under and half and graphics 



o 
o 



o 

o 

3 
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03C4 



03C* 


3D 


03C7 


53 


03CA 


67 


03C0 


*7 


0300 


29 


03D3 


28 


0306 


6C 


0309 


60 


03DC 


lA 


030F 


51 


03E2 


57 


0365 


45 


03E8 


52 


03EB 


54 


03Ee 


23 


03FI 


22 


03F4 




03F4 


4A 



VALIDE: 
Valid ESC-Setjuence Table 

3 bytes per entry:ascH char , "DH"-Vector. 
no. of entries is VALETS ^ ^ ^ 

Follo-ing body of table is 2 byte No-Match adrs 



: end: 



DB 
DB 
C6 
OB 
DB 
DB 
OB 
OB 

DB 
DB 
06 
DB 
DB 
OB 
OB 
DB 



VCAO 
VSAO 
VSGH 
VEGH 
VSHI 
VEHI 
VSUL 
VEUL 

VCLRS 

VI NC 

VDELC 

VINL 

VDELL 

VCEOL 

VLOCK 

VUNLK 



OH 
DM 
DM 
DH 
OW 
DM 
Oh 
OW 

OW 
OW 
DW 
DW 
OW 
DW 
OW 
DW 



ESCCAD ;Cursor Addressing 

ESCSAD ;Screen Addressing 

ESCSGR ;Set graphics mode 

ESCCGR ;Clr graphics mode 

ESCSHA ;Set half int. mode 

ESCCHA ;Clr half int. mode 

ESCSUN :Set underline mode 

ESCCUN :Clr underline mode 

ESCZZ ;Clear screen to blani^s 

tINSRT ;lnsert char 

EDELC ;Oelete char 

eSCEc ;lnsert line 

ESCRR :Oelete line 

EEOL ;Clear to end of line 

ESCLCK Stock Keyboard 

ESCULK ;Unlock Keyboard 



= 0010 



OW C0UT2 ;No Match exit 
; Ignore char upon undefined ESC-Sequence 
i (?o treat undefined char after ESC as a regular 
: data chart should go to C0UT2). ^„^,,^ 

CalETS: = {!end-VALIDE)/3 ?# of entries .n table 



o 



o 

o 

3 



a 
O 
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03f6 


00 


03F9 


OA 


03FC 


08 


03FF 


OC 


0*02 


OB 


0405 


07 


0408 


lA 


040B 


IE 



040E 9E05 



= 0008 



VALIDC: 












;Val i d control 


Character 


tabl 


e 


■ 3 bytes per entry 


• Asci i char 


: no. 


Of 


entr 1 es 


is 


VALCTS 


5 Fol 


low 


ng body 


of 


table is 2 


DB 




CR 


• 


ow 


VC_CR 


DB 




LF 




DW 


VC_LF 


OB 




BKS 




DH 


VC_3KS 


08 




HCRIGH 




OW 


VC.MCRT 


OB 




MCUP 




OH 


VC_«CUP 


08 




CBELL 




OW 


VC_BEL 


DB 




VCLRS 




OW 


VC.CLRS 


DB 




VHOHE 




DH 


VC.HOME 


OH 




VCUT97 






;no m 


VALCTS: = 




(C*-2)- 


■VAL!DC)/3 



, "Qvi"- Vector 

byte No-Match adrs 

Jcarriage return routine 

: I ine feed 

:back space 

Smove cursor right 

;inove cursor up 

;s ing bsl I 

tclear screen 

JCursor Home 



iNo match — ignore undef control char 
;Number of valid entries 



o 

o 



o 
o 

3 

T5 



O 
O 
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0410 



COUTs 
General output routine to Video Screen 

ENTRY 

C=Character. CURS=Cursor, ESCH=FI ag*Hode 

EXIT 

CURS £ ESCH updated. A=Character 

Ibc. de» hi preserved) 

ESCH is flag + mode byte as follows 
=00 Normal mode £ Last chr Esc flag false 
= 08 Norira! mode £ Last chr Esc flag True 
=01.02.04 Hode is Graphics. Half, or Under. resDectively 
. and Last chr Esc flag is False. 

=3.5.6.7 As above, but mode is combination 

=9-15 Last chr Esc flag True;otherwise liKe 1-7. 



0410 



PROC 



;RESET VETtCAL OFFSET WITH VRTOFF 



0410 


F5 


PUSH 


AF 


0411 


05 


PUSH 


BC 


0412 


3A62EF 


LD 


A.PIA3D 


0415 


E6E0 


AND 


111000008 


0417 


47 


HCV 


B.A 


0413 


3AEFEF 


LO 


A. VRTOFF 


0418 


E61F 


AND 


OOOlllllB 


0410 


BO 


ORA 


8 


041E 


4F 


MOV 


C.A 


041F 


C07109 


CALL 


CPBO 


0422 


CI 


POP 


8C 


0423 


Fl 


POP 


AF 


0424 


E5 


PUSH 


HL 


0425 


05 


PUSH 


CE 


0426 


C5 


PUSH 


BC 


0427 


2A5AEF 


LD 


HL.CURS 


042A 


3A60EF 


LD 


A, ESCH 


0420 


47 


MDV 


B.A 


042E 


E603 


AND 


EF.ESC 


0430 


2023 *0455» 


JRNZ 


PSTESC 



;PRESENT VALUE 
5HDUSEKEEPING 

;LAST VERTICAL OFFSET 

;CNLY VIDIO 

•.ADD HOUSEKEEPING 

;SET OFFSET 



;Current chr is NOT ESCaoed. 



0432 


79 


MOV 


A.C 


0433 


FEIB 


CKP 


ESC 


0435 


73 


MOV 


A.B 


0436 


2815 •0440* 


JPZ 


:ESC 



;hl will usually be cursor/ 

;B will be ESCH for a while 

;test flag bit 

;IF last chr was ESC 

Is this chr ESC? 

;Chr 

5 tA=ESCH) 

;i f this chr = ESC 



o 

o 
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O 

o 



JHere with 4=3 = 



0438 




:out: 






0438 


E5 




PUSH 


HL 


0439 


218403 




LDK 


HL.ESCHTB 


043C 


E607 




AND 


EF HSK 


0436 


87 




ADD 


A«A 


043F 


5F 




MOV 


EfA 


0440 


1600 




LDK 


D.O 


044 2 


19 




ADD 


HL.DE 


0443 




VECTOR: 






0443 


7E 




LD 


A»CHL] 


0444 


23 




INC 


HL 


0445 


66 




LO 


H,CHL] 


0446 


6F 




MOV 


L.A 


0447 


E3 




XTHL 




0448 


79 




MOV 


A,C 


0449 


C9 




RET 




C44A 




CCUT2: 






044A 


78 




MOV 


A,B 


0448 


18EB *0433$ 




JR 


sout 


0440 




:ESC: 










;Current chr 


is ESC. Set 1 


0440 


F608 




OR 


EF.ESC 


044F 


3260eF 




STO 


A,ESCH 


0452 


C39E05 




JMP 


V0UT97 



ESCH 
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;Mode bits only 
JTimes two 

;DE = offset 
;hl = tbi addrs 

;entry point. nots hi on stack. 
;ist byte (low order adrs> 

;2nd byte (hi order adrs) 

;HL=adrs from table 

JRestore hi from stack Sstack^tbl adrs 

;Chr. note 8=ESCH byte value 

lenter routine per table adrs. 



Srecal I ESCH value 

Joutput chr per current settings 



Jindicate last char= ESC 
lExit 



o 

o 



o 

o 

3 
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0*55 



PSTESC: 

•Last chr was ESC 

;eptry 

!A = 



:e 
;c 



0455 




0455 


CB50 * 


0457 


2075 *04C£» 


0459 


A8 


045A 


47 


045B 


3260EF 


045E 


E5 


045 F 


Z1C403 


0462 


lElO 


0464 


79 


0465 


1815 *047C* 



Proc 

BIT 
JRNZ 



EF_ESC 

ESCH 

Char to output 

curs 

4iB 
SETXY 



:is this chr rsally an address? 
;...if chr is part of an addr 



;no cursor/screen addressing in effect: 



XOR 

KCV 

STO 

PUSH 

LDK 

LOK 

HQV 

JR 



B 

StA 

A, ESCH 

HL 

HL.VALtDE 

EtVALETS 

A.C 

LOOKUPS 



;Clr cF ESC bit (far next time) 
-.Set uo~3 = ESCH byte value. 

;save Curs 

;8ranch table adrs 

;Tabl e si ze 

;Chr to A 

;Go to routine to branch per tbl 



o 
o 



O 



O 

o 

3 



O 
o 
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0467 



0467 FE20 

0469 380B *0475$ 

046B VBRIGH: 

0468 

046C 

046E 3680 

0470 

0472 

0473 C38105 

0476 :2: 

0476 E5 

0477 21F603 
047A 1E08 



VNORM: 

SNORMAL mode character processing. 

SENTRY 

>A = char to output 

;HL=curs 



CMP 
JRC 

01 

ENADIM 

STO 

DISOIH 

EI 

JMP 



!2 



tIF control chr 



PUSH 
LDK 
LDK 
JMP 



BRTSIT.Chn 
VOUT80 



HL 

HL.VALIDC 
E.VALCTS 
LOOKUPS 



«9th bit memory 



Jset this chr 3RIGHT 



SSave Curs 

;Branch table adrs 

Stable size 

SScan table of valid control cbrs 

Sand branch to appropriate routine. 
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047C 



<» 
O 



o 
o 









:c 








:a 


CtTC 


BE 






047D 


23 






047E 


28C3 


-0443$ 




0480 


23 






0431 


23 






0482 


10 






0483 


20F7 


»047C$ 




0485 


18BC 


*0443$ 





lookups: 
Logic to scan 3 byte branch table 

NOT a subroutine do not CALL> 

ENTRY 

HL =lst byte of table (match code) 

(2nd»3rd bytes = branch adrs) 

(table repeats t3 byte entries!) 
E is table size (no. of entries) 

(table body is followed with 

2 byte "No-Match" adrs) 
Stack has HL saved as top entry. 

= char 

= value to scan for possible match 

CMP CHLJ 

INC HL :i2nd byte of this 3 byte entry) 

JRZ VECTOR ilf match process 

INC HL :{3rd byte of this entry) 

INC HL ;lst byte of next entry 

OEC E ;Dec count of entries remaining 

JRNZ LOOKUPS ;Continue thru body of table 

JR VECTOR ;No-Match. hl=points to vector 
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• Processing for modes other than normal. 



g :VGRAPH = V0UT80 ;Nornal mode EXCEPT: cnti chrs are printed 

ro 

§ 0487 VUNDSR: 

;Unfler I ine onl y 

3 0437 FE20 CMP • • 

^ 0489 38DC *0457t JRC VNORM ;if cntl-chr, process as normal 

1 5 JR VUN.GR ;continue 

I 048B VUN_GR: 

Z JUnderlined Graphics 

o 0488 F680 OR 80h Sunder I ine bit 

■§ 0480 18QC *0468S JR VBRIGH {set this chr BRIGHT 

S 

5" 048F VUN_HA: 

^ {Underline and Half intensity 

048F FE20 CMP • • 

0491 3804 *0467t JRC VNORM :if cntl-chr, process as normal 

; JR VUN_HA_GR 

0493 VUN_HA_GR: 

;Uncerline< Half Intensity, Graphics 
0493 F680 OR 80h {set underline bit 

5 JR VHA_GR 

0495 VHALF: 

{Half Intensity 
0495 FE20 CMP • • 

0497 38CE *0467» JRC VNORM {if cntl-chr, process as normal 

{ JR VHA_GR 

0499 VHA_GR: 

{C=Chr. Hl.=Curs 

0499 DI 

049A ENADIM 

049C 3600 STO DlMSIT.Chn {set dim field bit 

; LO E,Chn {diagnostic 

049E DISOIM 

04A0 El 

04A1 C38105 JMP VQUT80 {continue 



o 
o 

3 
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04A4 



screen: 

;SetXY for Screen movement 

:entry 



:b 

iA 



04A4 

04A4 Ca70 $ 

04A6 2012 -04BA* 

04A8 

04A8 E61F 

04AA 4F 

04AB 32EFEF 

04AE 3A52eF 

0481 E6E0 

0483 SI 

0*84 4F 

04B5 C07109 

0488 1826 *04e3t 



:s¥: 



Proc 

BIT 

JRNZ 



AND 

HCV 

STO 

LO 

AND 

OR 

MOV 

CALL 

J P. 



04BA 

04BA 87 

04BB C6EA 

048D E6FE 

04SF 4F 



:sX! 



04CO 3A61EF 

04C3 E601 

04C5 Bl 

04C6 4F 

04C7 CD6409 

04CA CBAS 

04CC 1824 



ESCH 

new co-ord val» NO OFFSET 



6>B 
:sX 



;if X-coordinate 



0001_llllb 

CtA 

A.VRTOFF 

AtPIASO 

1110_0000b 

C 

C.A 

CPBD 

:exitY 



ADD 
ADO 
AND 
HOV 

;SET DENSITY BIT 

LD 
ANI 
aRA 
MOV 
CALL 
$ CBIT 

04F2t JR 



AtA 

AtVFLQ 
llll_1110b 
C.A 



AtPIAAD 

0000.00013 

C 

C.A 

OPAO 

5.3 

sexitx 



;mod 32 

:SET VERTICAL OFFSET FOR COUT 

;set Y coordinate 



;double A 

:P!A A-reg magic offset constant 

;clear bit 



:GET old VALUE 

;save density bit 

;0r in horizontal offset 

:fumctidn pia 

:finished screen-addressing 



o 

o 
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04CE 



SETXY; 

?Set X-Y value for Cursor/Screen Addressing 

;entry 

!ML = cursor_addr 

;8 = ESCH 

;C = chr 



o 

o 

3 



04CE CD1907 

04D1 3EE0 

04D3 81 

04D4 CB68 S 

04D6 20CC *04A4$ 



:exiT 

;to V0UT90; ESCH updated 

CALL UN_CUR 

LDK A.-<' •) 

ADD C :remove cursor bias 

BIT 5tB 



JRNZ 



Scursor/screen addressing? 
SCREEN ;if screen addressing 



• cursor addressing: 



04DS 


29 






ADO 


HL.HL 


04D9 


CB70 


S 




BIT 


6t8 


04DB 


2010 " 


04EDt 




JRNZ 


:cX 


04DD 






!cy; 






04D0 


67 






MOV 


H.A 


040E 


3A62EF 






LO 


AtPIABD 


04E1 


84 






ADD 


H 


04E2 


IF 






RAR 




04E3 


CBID 


S 




RR 


L 


04E5 


F6F0 






OR 


OFOh 


04E7 


67 






MOV 


H.A 








f 


JR 


:exitY 


04E3 






:exitv: 






04E8 


3E40 






LDK 


A»0100_( 


04EA 


BO 






OR 


B 


04EB 


1808 *l 


!)4F5t 




JR 


:exit2 


04ED 






:cx: 






04ED 


17 






RAL 




04EE 


CB2C 


S 




SRA 


H 


04F0 


IF 






RAR 




04F1 


6F 






MOV 


L.A 








; 


JR 


:exitX 


04F2 






:exitX: 






04F2 


3E07 






LDK 


A.EF MSI 


04F4 


AO 






AND 


8 


04F5 






:exit2: 






04F5 


32&0EF 






STO 


A. ESCH 


04F8 


C 39605 






JMP 


V0UT90 



Sshift HL left 
tX/Y coordinate? 
; if X coordinate 



isave 



soffset by start-Y co-ord of video 
;bitO<A) -> CYf shift A right 
;C¥ -> bJtTJL) 
Jturn on upoer nybl 
tHL= new cursor addr 



A»0100_0000b ;next addr-chr will be x-coord 



;trash 7th bit 

;bitDIH) -> CY. bit? stays 1 

:... CY -> bit7(A) 



Sfinished addressing: reset addr bits 
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; Control Code character processing 



a 

O 
o 

3 



04FB 

04Fa 

04FB CD1907 

04FE 3A6ZEF 

0501 IF 

0502 2E00 

0504 CBIO S 

0506 67 

0507 182F *0538$ 



VC_H0ME: ;Home Cursor 
Proc 

CALL UN_CUR 

LD AtPIABD 
RAR 

LOK LfO 

RR L 

HOV H,A 



JR 



:f ixhi 



;bit0 => CY 

!CY => t)it7. trash bitO 

;HL != HL or FOOOh 



o 

o 
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0509 VC_MCUPi ;Move Cursor Up. 
;A=C=Chr=HCUP. HL=Curs. 

0509 C01907 CAUL UN CUR 

050C E5 PUSH HL ;old cursor must be on stack 

050D 0180FF LOK BCt<-VLL) 

0510 1815 *0528$ JR : f wa ;...at this entry point 



O 

o 

3 



O 

o 



0512 



VC_BKS: 

;HL=Curs=current told) char 



0512 


C01907 


0515 


3e7F 


0517 


A5 


0518 


2803 *051D$ 


05 lA 


28 


0518 


1879 *0596$ 


0510 




0510 


€5 


051E 


017FFF 


0521 


09 


0522 


3A6CEF 


0525 


*F 


0526 


0600 


0528 




0528 


09 


0529 


E3 


0S2A 


29 


0528 


3A62EF 


052E 


F6E0 


0530 


BC 


0531 


El 


0532 


2004 "05381 


0534 


OlOOOC 


0537 


09 


0538 




0538 


3EF0 


053A 


84 


0538 


67 


053C 


1858 «0596» 



:wrap: 



:fwa: 



Jf ixh) : 



CALL 


UN_CUR 


LDK 


At7Fh 


AND 


L 


JRZ 


iwrap 


DEC 


HL 


JR 


VCUT90 


PUSH 


HL 


LOK 


BC.-(VLL+1» 


ADD 


HL.BC 


LO 


AtLLIMIT 


MOV 


C,A 


LDK 


B.O 


ADD 


HL*8C 


XTHL 




AOO 


HLtHL 


LD 


A.PIA3D 


OR 


1110_0000b 


CMP 


H 


POP 


HL 


JRNZ 


:f ixhl 


LOK 


BC.124*VLL) 


ADD 


HL»BC 


LDK 


A.OFOh 


OR 


H 


MOV 


H,A 


JR 


V0UT90 



;clear 80h bit 

;if must wrap from col to LLIHIT 
;Exit 

tsave old cursor 

;hl = prev_Hne» t-l)st column 
JLLIMIT = tfcolumns on screen 



•get old cursort save new 
»shi ft line* into H reg. 

;a = line* of UL corner 
:set Zflag: ahome? 
•get new cursor... 
;)f NOT Svideo home 
•wrap constant 



;modulo result: keep cursor 
•inside video memory. 



o 
o 

T3 
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0536 

053E 
05*1 
0543 
05*4 
0547 
0549 
054C 



3A6ZEF 

F5Z0 

4F 

C07109 

3E1E 

326BEF 

1850 *059E$ 



VC_8Et: 
:Ring the 



bet I 
LO 
OR 
HOV 
CALL 
LOK 
STO 
JR 



^ia setting 
AtPIABD 
0010_0000b 
tiA 
OPBO 
At30 

A.BELCNT 
V0UT97 



PIAB 2**5 bit 

;bel1 bit 

ifunction PIAB 
;r ing bel I for 30 ticKs 
;... = 1/2 second 
;exit no change 



O 
o 
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Routines. 




? 
i 


05«e 


2100F0 


vc. 


.CLRS 


: LOK 


HLiFHAVH 


J 


0551 


C0S406 






CALL 


CLRLN 


© 


0554 


OlSOOIr 






IDK 


BC.LVHEH-VLL 


S3 


0557 


D5 






PWSH 


DE 


0558 


DDEl 


t 




POP 


IX 


9 


055A 


CD0507 






CALL 


VLOIR 


§■ 


055D 


3A62EF 






LO 


A.PIABD 


3 


0560 


E6E0 






AND 


not<l_llllb> 


o 


0562 


4F 






MOV 


C.A 


o 

3 
■a 


0563 


C07109 






CALL 


OPBD 


0566 


AF 






XRA 


A 


c 


0567 


32eFEF 






STQ 


A.VRTOFF 


9 


05 6 A 


2100FO 






LDK 


HLtFWAVM 


0560 


1827 -0596$ 




JR 


VCUT90 
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•clear 1st I i ne 



•clear remaining lines 

:Reset for 1st line of display mem 



;zERa A 

;SET VERTICAL OFFSET FOR COUT 
Snew cursor 
;Exi t 



n 

o 
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3 
■a 



056F 

0S6F C01907 

0572 3E80 

057* A5 

0575 6F 

0576 181E *0596i 

0578 

0578 CDA706 

057B 1819 "0596$ 



VC_CR! 








CAtL 


UN_CUR 




LDK 


AtSOh 




AND 


L 




MOV 


L.A 




JR 


V0UT90 


VC_LFS 








CALL 


DQ_LF 




JR 


VCUT90 



• erase cursor 
:Carri3ge Return 



•Line Feed 
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to 
Q 



a 

O 
o 

3 



O 
o 



0570 VC_WCRT ;Move Cursor Right 
ncTn rman-T r> > . . .<. . 

"' ■ " -.»»»«. UA1.L on t.UK 

0580 7E LD A.thI] 

i JR V0UT80 ;re-echo current chr 



o 

o 



O 

o 

3 
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: Exit points for COUT 

; Here to store new data and to update cursor 



0581 
0581 

0581 77 

0582 50 

0583 CBSB i 
0585 3A5CEF 

0588 3D 

0589 93 

058A 2009 *0595i 

OSSC 3E80 

058E AS 

058F 6f 

0590 C0AA06 
0593 1801 *0596t 

0595 

0595 23 



0596 
0596 7E 



0597 

0597 17 
0598 

0598 3F 

0599 IF 
0S9A 77 
0598 225AEF 



059e 

059E CI 

0S9F 01 

05A0 El 

05A1 79 

05A2 C9 



VGRAPHS 
VOUT80: 



STO 

MOV 

CBIT 

LD 

DEC 

SUB 

JRNl 

LDK 

AND 

MOV 

CALL 

JR 



A.IhU 

EfL 

7,E 

A.LLIMIT 

A 

E 

vouTes 

AiSOh 

L 

L«A 

D0_LF2 

V0UT90 



:This exit path stores A < new charJ 

;E = coKcursorl 

;a = last_legal_col 

;a = last_legai_col - coKcur) 

Sif not iLLIMlT 

;do CR... 
:...and LF. 



VOUT85: 



V0UT90: 



= 0510 
= 05FF 



INC HL Smove cursor 

Here if NO cursor update 

LD A.CHL] ;This exit path turns on BOh bit 

Here if new data already in A 

SMake this chr cursor 

Sinvert cursor bit 

•update cursor 
to cursor* restore reg and exit 



SExit with A=chr 

;returnt end of cout subr. 

(127 + 2) ;earliest possible JR 

1128 - 2) ;latest possible JR 



V0UT95: 


RAL 




V0UT965 


CMC 
RAR 






STO 


A«chn 




STO 


HL.CURS 


9 


Here 


i f no Chan 


VCUT97: 








POP 


BC 




POP 


DE 




POP 


HL 




MOV 


A,C 




RET 




sFirst 


= 


V0UT97 


:Last 


= 


V0UT80 



o 

o 
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05A3 ESC_LCK; :Lock Keyboard 

05A3 Proc 

05A3 AF xOr" A 

05A4 180Z *05A8$ JR !2 
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O 
o 

3 



05A6 

05A6 3EFF 

05A8 

05A8 3259EF 

05AB 18F1 *059£$ 



ESC.ULK: JUnlock Keyboard 
tOK A,OFFh 

:2! 

STO A.KEYLCK 



JR 



V0UT97 



O 

o 



o 
o 
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05AD EEOL: 

; Erase to end of line 

05AD E5 PUSH HL 

05AE CD8406 CALL CLRLN 

05BI El POP "L 

0582 18E2 •0595* JR V0UT9a 



;save cursor 



o 
o 

3 



o 



o 

o 

3 



a 
O 



Keyboard and Console Routines. 
05B4 



SORCIH 808x Assembler ver 3.5E <:/55/7= 59:92 Page 45 



eSC.CAD: 

;Cursor Addressing 





0SB4 


3E0T 


LOK 


AtEF MSK 


to 


OS 86 


AO 


AND 


8 


M 


0587 


F618 


OR 


EF_ESC or EF_, 


9 


0589 




:exit3: 




O 


05B9 


3260EF 


STO 


A.ESCH 


i 


058C 


1860 *059ES 


JR 


V0UT97 



C:SDROMA .ASH 



;next chr will be Y-coord 



058E ESC_SAD: 

•Screen Addressing 
05BE 3E07 tOK A.EF HSK 

05C0 AO AND 8 

OSCl F638 OR EF_ESC or EF AOR or EF SCR 

05C3 18F4 -0589$ JR :exit3 



o 

o 
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;Subroutine for use with EOELC and EINSRT: 

;Calculate #chrs to move; if move zero chrs. never return. 

05C5 Proc 

05C5 scale: 

05C5 3e7F LOK A.VLL-1 ; A= max #chrs to be moved 



05C7 *0 HDV C.L 

05C8 C8B9 
05CA 91 



CBIT 7.C ;C = coHcursor) 
SUB C !A = #chrs to move 



" 05CB 2804 »0501S JRZ send J if move zero characters 

g> 05CD *F NOV C.A 

I 05CE 0600 LDK B.O ;BC = #ohrs to move 

£ 05D0 C9 RET 

o 

0501 :end! 

■o 0501 El POP HL ;trash return_addr 

° 05D2 El POP "L ;cursor_addr 

1 05D3 18C1 »0596* JR V0UT90 



o 

o 
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^ 


0505 




EDELC: 






s 






soelete 


! Charac 


tar 


e 


05D5 


E5 




PUSH 


ML 


i 


05D6 


CDC505 




CALL 


Jcalc 


§ 






• 


MOV 


D<H 






• 


MOV 


EtL 


s 


0509 


£5 




PUSH 


HL 


3 


050A 


DOEl $ 




POP 


IX 


o 


05DC 


23 




INC 


HL 


O 

3 


O5D0 


CD0507 




CALL 


VLOIR 


■a 


05E0 


3620 




STO 


' '.Chi] 


S 


05EZ 






01 




-1 

o 


05E3 






ENAOIH 




o 


05E5 


2B 




DEC 


HL 


o 


05E6 


3680 




STO 


BRTBIT,C 


o 


05E8 
05EA 






OISDIM 
EI 




Z3 


05EB 


El 




POP 


HL 




05EC 


18A8 "0596$ 




JR 


V0UT9O 



Ssave cursor_addr 
•calculate 8C 

;DE = cursor addr 



;hl = cursor_addr + 1 

;niove characters 

JIast chr becomes blank 

:enable 9th bit raemory 

!HL = last chr on this line 
H'3 ;set chr BRIGHT 

•main memory 

•restore cursor_addr 
• next 



o 

o 
■g 



O 
o 
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05EE 


C01907 


05F1 


E5 


05FE 


C0CS05 


05F5 


3E7F 


05F7 


B5 


05F8 


6F 


05Fq 


E5 


05FA 


DDEl 


05FC 


2B 


05F0 


CDF106 


0600 


El 


0601 


7E 


0602 


17 


0603 


3E40 


0505 


1891 * 



059SS 



EINSRT: 






; Insert 


Character 




CALL 


UN_CUR 




PUSH 


HL 




CALL 


:calc 




LDK 


A,7Fh 




OR 


L 




MOV 


L.A 




PUSH 


HL 




POP 


IX 




DEC 


HL 




CALL 


VLDD<1 




POP 


HL 




LD 


AtChll 




RAL 






LOK 


At* • 




JR 


V0UT96 



:save cursor_addr 
;calculate BC 



;hl = last_chr on this line 



;do move 
;restore cursor 

;get underline bit of this chr. 
; into CY 
Shi 1 ;change this chr to • ' 
Sexit 



o 

o 



O 



O 
o 

3 



O 

o 
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tESC-Seguence 
0607 proc 

— — — - b.<#^r^<7TX* 

0607 3E01 LDK 

0609 1806 *061l$ JR 



Assembler wer 



processing. 



060B 

060B 3E02 

060D 1802 *0611$ 

3E04 

80 



ESCSHAS 



LDK 
JR 



060F 
0611 
0611 
0612 
0612 3260EF 



0615 



ESCSUN: LDK 
S125: 

OR 
:1305 

STO 
1887 *059Et JR 



0617 3EFE ESCCGR: LOK 

0619 1806 *062l» JR 

061B 3EFD ESCCHA: LDK 

061D 1802 "0621$ JR 

061F 3EFB ESCCUNS LOK 

0621 :140: 

0621 AO AND 

0622 18EE *0612$ JR 



= 054E 



ESCZZi 



A.EF_GR 
S125 



A.EF_HA 
S125 

A,EF_UN 

8 

A.ESCH 
V0UT97 

A, NOT EF_6R 
:140 

At NOT EF HA 
:l*0 

A. NOT EF_UN 

B 
1130 

VC.CLRS ;esc- 
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;ESC-g 

•set graphics mode. 



;esc-» set half intensity 
;go set flag bit 

•ESC-I set underline 

;Reg B is ESCH Byte value 

• store desired value. 
;Exit 

?ESC-G Clear graphics mode 
Jgo clear ESCH bit 

;ESC-I Clear half intensity 

•ESC-m Clear underline 

•Clear bit 

5Go store ESCH byte 

Z Clear screen -same as 
;Control-Z routine. 



o 

o 
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0624 



ESCRR! 
;Delete Line 



062* 



O 
o 

3 



0624 
0624 
0627 
0629 
06 2 A 
062B 
062C 
062D 
0630 
0632 
0633 
0635 
0636 
0638 
0639 
063A 



CD1907 

3E80 

A5 

6F 

E5 

29 

3A62EF 

C618 

94 

E61F 

47 

3E52 

89 

78 

2823 *065F$ 



ESCEE: 

;lnsert Line 
;entry 

5HL = 

;c 

;exit 

; screen updated 

?HL 

Proc 

CALL 

LDK 

AND 

MOV 

PUSH 

ADD 

LD 

ADO 

SUB 

AND 

MOV 

LDK 

CMP 

HQV 

JRZ 



cursor 
chr 



;do CR 
:save new 



new cursor ...to V0UT90 



UN_CUR 

A, lOOO.OOOOb 

L 

L.A 

HL 

HL.HL 

A.PIABD 

A. 24 

H 

OOOl.llllb 

BtA 

AtVDELL 

C 

A«B 

sdelt 



cursor 



;a = addrl25th Hnel 
5A = I ines_to_inove + 1 
;mod 32 



irecalt #lines to move 
;i f deleting a 1 ine 



063C 



I insrt! 

; Insert a line 



063C 


84 






ADD 


H 


0630 


57 






HOV 


D«A 


06 3E 


lEOO 






LDK 


EfO 


0640 


CBIA 


$ 




RR D 




0642 


CBIB 


i 




RR E 




06*4 


IB 






DEC 


DE 


0645 


78 






HOV 


AtB 


0646 


Z180FF 






LOK 


HL.-VLI 


C649 


19 






ADO 


HL.CE 


064A 


1806 •0652t 




JR 


sistrt 


064C 






: icont: 






064C 


05 






PUSH 


OE 


064D 


DOEl 


S 




POP 


IX 


064F 


CDF106 






CALL 


VLODR 


0652 






listrt: 






0652 


C07506 






CALL 


s vmod 


0655 


20F5 -( 


364C$ 




JRNZ 


! icont 


0657 


23 






INC 


HL 



;a = addr(25th I ine) 



;shift right OE , . . 

;de = addr( lst_chr_on_lst_l me) 

;A = #1 ines to irove 

;hl = addrCline above DE) 

;DE 5= DE or FOOOh; HL := HL or FOOOh 



:move 1 line down 



;jf must move more lines 
;hl => 1st chr of new line 
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O 
o 



O 



0658 






:exit: 






0658 


C03406 






CALL 


CLRLN 


06SS 


El 






POP 


HL 


065C 


C39605 






JHP 


VCUT90 


065F 






:delt: 






065F 


01 






POP 


DE 


0660 


05 






PUSH 


DE 


0661 


218000 






LOK 


HL»VLL 


0664 


19 






ADD 


HL,DE 


0665 


1806 '■0650S 




JR 


:dstrt 


0667 






Jdcont: 






0667 


05 






PUSH 


DE 


0668 


ODEl 


S 




POP 


IX 


066A 


C00507 






CALL 


VLDIR 


0660 






:dstrt: 






066D 


CD7506 






CALL 


:vmod 


0670 


20F5 »( 


3667$ 




JRNZ 


:dcont 


0672 


EB 






EX 


HLtOE 


0673 


18E3 *0658$ 




JR 


sexit 



; recover cursor 
•Main Exit 



■recover new cursor 



;hl = li ne_be1ow_cur sor 



•move 1 I ine up 



•get addr of line to clear 
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SHL := HL or FOOOh; DE := DE or FOOOhJ 

;sirapla niod-4096 arithmetic to keep pointers INSIDE video meinory 

:vmod: 

PUSH AF ;save A = #lines to move 

LOK A»OFOh 

OR H 

HOV H»A Sset upper nybl of H 

LDK A.OFOh 

OR 

HOV 0«A imodulo 4096 

LDK BC.VLL 

POP AF 

DEC A ;decrenient Hne_count 

RET 



o 


Keyboard an 


% 






*< 






IT 






e 


0675 




CO 


0675 


F5 


s 


0676 


3EF0 


9 


0678 


B4 




0679 


67 




067* 


3EF0 


O 
o 


067C 


B2 


0670 


57 


3 


067E 


OlSOO 


c 


0681 


Fl 


(D 


0632 


3D 


O 
O 


0683 


C9 



o 

o 



o 



3 

TJ 



O 

o 
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C:SDROMA 



.ASH 



0684 




CLRLNJ 










:Clear 


to end of line 






SENTRY 










;hu 


= 


Cursor 






;exit 










•clear 


to EOL 








: 


uses 


All. 


0684 






PROC 




0684 


3620 




STO 


• '.thll 


0686 






DI 




0687 






ENADIH 




0689 


3680 




STO 


BRTBIT.Ihn 


0688 






OISOIM 




0680 






EI 




06 8E 


3A6CEF 




LO 


A.LLIMIT 


0691 


30 




DEC 


A 


0692 


SO 




MOV 


E,L 


0693 


CBBB 


s 


CBIT 


7,E 


0695 


93 




SUB 


E 


0696 


C8 




RZ 





0697 3004 "0690$ 

0699 3E80 

069B 93 

069C C8 

0690 :2: 

0690 4F 

069E 0600 



06A0 E5 

06A1 DOEl $ 

06A3 0023 $ 

06A5 185E *0705$ 



JRNC 



;2 



LDK 


A»VLL 


SUB 


E 


RZ 




MOV 


C,A 


LDK 


BtO 


HOV 


E,L 


MOV 


D<H 


PUSH 


HL 


POP 


IX 


INC 


OE 


INC 


IX 


JR 


VLOIR 



•Clear cursor*** 

Sset cursor BRIGHT 

;max_#cols => maxiraum_col_» 



;A = col(EOL) - coHcursort 
;if 3E0L* done 

•if inside tog ical _video_l f ne 



•.•*else clr to end of 128-chr line 
;if cursor 3 column #127 



;3C = chrs to move 



:de 



HL ♦ 1 
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06A7 



00 LF! 

;Do Line Feed processing 

:entry 

• HL = cursor_addr 



o 
o 

B 



O 

o 



06A7 

06A7 CD1907 

06AA 

06AA E5 

06A8 018000 

05AE 09 

06AF 3004 »06B5$ 

06B1 OlOOFO 

06B4 C9 

06B5 

06B5 £3 

0686 29 

06B7 3A62EF 

06BA C617 

066C 94 

06BD E61F 

063F 2302 *0&C3» 

06C1 

06C1 El 

06C2 C9 

06C3 

06C3 3A6CEF 

06C6 C83D * 

06C3 95 

06C9 38F6 '06CIS 



06CB El 

06CC E5 

06CD 3680 

06CF A5 

06D0 6F 

06D1 C03406 

06D4 3A62EF 

0607 47 
06D8 E6E0 
06DA 4F 

0608 3E1F 
0600 04 
06DE AO 
06DF 32EFEF 
0662 31 
06E3 4F 
06E4 C07109 
06E7 El 
06E8 C9 



;exit 

;Cursor cleared 

;hl updated for current cursor pos 

;window moved if necessary 

PROC 

CALL UN CUR Jclear cursor 



DO LF2I 



:nowap: 



:end: 



: vmov: 



PUSH 

LDK 

ADO 

JRNC 

LOK 

ADD 

XTHL 

ADO 

LD 

ADD 

SUB 

AND 

JRZ 

POP 

RET 



LO 
SRL 

sua 

JRC 



HL Jsave original cursor 
BCtVLL Sline length 

:nowap ;if not wrapping frorn LWAVM to FHAVM 

BC.FWAVM 

HLfSC ?HL = new cursor 3 top of VM 

;save new cursor t get old 
HL.HL :shi ft HL left 
A.PIABO 

4,23 :start + 23 = last.v i deo_l ine 

H ;a = l_line - curr_line 

0001 1111b :modulo 32 

ivmo^ !if cursor is on 24th line of screen 



HL 



;get new cursor 



A.LLIMIT 

L ;unshift L register 

L ;a = LL1»<IT - coltcursor) 

;end ;if cursor is outside logical line 



•cursor is on last line of screen, inside of logical line. 
Imust nove screen to follow cursor down through video menory. 
POP HL 

HL 

A.eoh 

LtA ;hl = beginning of line 

CLRLN ;erase to EOL 

A.PIABO 

B,A 

not 31 ;A = I ine zero 

C,A !C = housekeeping bits 5. .7 

A. 31 

8 ; increment line* 

LvRTOFf'* " "";SET VERTICAL OFFSET FOR COUT 

C SA = new line* OR housekeepi ng_bi ts 

C,A tC = new value for OPSD 

OPBD ;niove video screen down 1 line in memory 

HL 



PUSH 

LOK 

AND 

MOV 

CALL 

LO 

MOV 

AND 

MOV 

LOK 

INC 

AND 

STO 

OR 

MOV 

CALL 

POP 

RET 



o 

o 
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06E9 



V 






:b 


x 












M 






;hl 


= 


o 










<0 










1 






JEXIT 




3 






;none 




o 


06E9 






PROC 


O 

3 

13 


06E9 






01 


06EA 






ENAOIM 


ffl 


06EC 


70 




STO 


O 

o 


06ED 






OISDIH 


06EF 






EI 


E 


06F0 


C9 




RET 



STODIM: 

;STORE THE CONTENTS OF THE 3 REG IN THE ADDR POINTED TO BY THE HL PAIR 

I ENTRY 

VALUE 

ADDRESS 



B.tHL3 



;ENABLE DIM 
:STORE 
{DISABLE DIH 
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06FI 



VLODR: 

;Video Block Hove 

;ENTRY 

;BCt IXt HL set 



EXIT 

IDDR on main £ 9th bit memory 
Uses BC« DEt HLtlX 



3 

T3 



O 
O 



06F1 


DDES 


S 




PUSH IX 


06F3 


01 






POP DE 


06F4 








PUSHAL 


06F7 


E0B8 


t 




LDOR 


05F9 








POPALL 


06FC 








01 


06FD 








ENADIH 


06FF 


EDB8 


$ 




LDOR 


0701 








OISDIH 


0703 








EI 


0704 


C9 






RET 


0705 






VLDIR: 

;video 

; ENTRY 

;8C, IX 


Block Hove 
. HL set 



•main memory 



;9th bit memory 



EXIT 

LOIR on main £ 9th bit memory 
Uses BC. DE. HLtlX 



0705 


DDE5 


0707 


01 


0708 




070B 


EDBO 


0700 




0710 




0711 




0713 


ED80 


0715 




0717 




0718 


C9 



PUSH 

POP 

PUSHAL 

LOIR 

PCPALL 

01 

ENAOIH 

LOIR 

DISDIH 

EI 

RET 



IX 

DE 



;main memory 



;9th bit memory 



o 

o 

>< 






O 
o 

3 



O 
o 
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0719 




U^_CUR: 










:Un do/Invert 


Cur sor 






: ENTRY 










:Ht 


s 


cursor_addr 






;exit 










; cursor 


inverted 






» 


Uses 


A, CY. 


0719 


7E 




LD 


A.thl] 


071A 


17 




RAL 




071B 


3F 




CMC 




07 IC 


IF 




RAR 




071D 


77 




STO 


AtChI] 


07 IE 


C9 




RET 





Sget the chr 
5cursor_bit => CY 
; invert it 



o 

o 
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071F 



GKEY: 

:iceyboard interrupt processor 

:entry 

;none 



o 

o 



:exit 

JKEYBOARD PROCESSING DONE. RESULT IN LOKEY. 
;SYSTEH CLOCK UPDATED BY UPTIH. 



071F 



PROC 



071F 
0720 
0724 
0727 



ED736FEF 
3199EF 



072F CD9803 



01 




STO 


SP.IESTK 


LDK 


SP.ISTK 


ALPUSH 





CALL 



UPTIH 



;SAVE INTERRUPTED PROCESS STK 
;SET TO RAH INT STK 



;UPDATE SYSTEH CLOCK 



0732 


3A59EF 




LD 


A.KEYLCK 


0735 


87 




OR 


A 


0736 


C*3C07 




CNZ 


KBDRVR 


0739 




GKEYXs 






0739 


C31E00 




JHP 


EXITI 



:exit interrupt 



o 

o 

3 

T5 



O 



SORCIM 80Sx Assembler ver 3.5E <;/5S/7= 59:92 Page 59 
Keyboard and Console Routines* C:SOROHA .ASH 

This file contains the 2-key roil over keyboard driver for 
the OSBCRNE 1 comuter. 

Author s 

Microcode Corporation. 

Fremont* CA. 

Y. M. Sahae 

September 1981 

Revisi ons: 

2-Key roll over keyboard driver. 

DESCRIPTION: 

The keyboard driver gets control via the 60hz interruptt i.e. once 

every 16 ms. It scans the keyboard to detect any struck keys. If a 

key is founds it is entered into the key list if there is space 

in the keylist and the key is not already in the list. At the end of 

the scan, the keys in the list are proecessed. If the key is still 

on. it is placed in ikey tor special action taken) after translating 

the keynumber. A count is also stored in the list and the key will 

be serviced again at the end of this count if it is still on. Thus 

the key will repeat if it is held down. If a key which is in the 

list is not on it is removed from the list. 

The keyboard driver consists of the following routines: 

KBORVR - Examines the keyiist. calls CHKEY to determine if key 
is still on. Removes the key from the list if it is not on. If 
key is on. it decrements the count associated with the key. when 
the count goes to zero, it calls K3SERV to service the key. Calls 
KBSCAN to enter any new keys into the list. 

KBSCAN - This routine scans the keyboard, detects a struck 

key and enters it into the keylist. The key is entered 

into the keylist if the key Is not already present in the keylist 



and there is an empty slot in the keylist 



KBSERV - It calls the routine CHKEY to check if shift/cti or alphlock 
keys are on. It then translates the keynumber into the ASCII 
code and places it in the LKEY for the CBIOS to read. For some 
special cases, it calls ROM resident routines to process the key. 

CHKEY - It checks if a given key is on. 



Data structure: 

The main structure used is the kaylist. 



Byte 0: 



The format of each entry is: 



Byte l: 



bit 7 : Set indicates entry is in use. 
bit 6 : Set indicates key has been serviced once, 
bits 5. .3 : contain the row number of struck key. 
bits 2..0 : contain the column number of struck key. 

bits 7..0 : contain the repeat count for the key. 



o 
o 
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o 
o 



o 
o 



073C KBDRVR: 



073C 

073C CD7«07 



073F 21D4EF 

0742 0603 

0744 =13= 

07*4 3A5EEF 

0747 87 

0748 CO 

0749 7E 

074A CB7F » 

074C 2821 *076Fi 

074E C00107 

0751 2004 *0757$ 

0753 3600 

0755 1818 •076Ft 

0757 =20= 



0757 E5 

0758 23 

0759 35 

075A 2012 *076ES 



075C E3 

075D 7E 

075e CB77 t 

0760 C8F6 S 

0762 E3 

0763 3618 

0765 2802 *0769$ 

0767 3606 

0769 =Z2: 

0769 663F 

076B CDF807 

076E =30= 

076E El 

076F =*0= 



0771 1001 "0744$ 
0773 C9 



Routine name: KBDRVR - Detects and processes keystrokes. 

Input: none 

Output: LKEY contains keystroke. 



PROC 
call 



kbscan 



;scan keyboard and enter keys into keylist 



Examine keylist. If key found in keylist, call CHKEY to see 
if key is still on. remove from list when not on. 



LDK 
LDK 

Id 

or 
RNZ 

Id 

bit 

Jrz 

call 

jrnz 

sto 

Jr 



h t «key 1st 
b»kl_len 

at I key 



a.thn 

kl used, a 

:40 

chkey 

:20 

O.thll 

:40 



;D0int to first entry of keylist 

;exit when a key is waiting in Ikey 

;get byte of entry 

!if entry is in use then 
;check if st i I I on 
;if key is now off then 
:remove key from list 



:el se 

key is on- decrement its repeat count. If count goes to zero 
then it is time to service the key. 



push 
inc 
dec 
Jrnz 



hi 
hi 
Chll 

:30 



;save ptr to first byte of entry 
:point to repeat count 



;exit when not time to service the key. 
it is time to service the key- Set the next repeat count 



ex 

Id 

bit 

sbit 

ex 

sto 

jrz 

sto 

and 
call 

pop 



echo 
inc 

ENDM 
djnz 

RET 



CSDl,h! 

a, Chll 

ky_srvd,a 

ky_srvd,thl 3 

Csp]«hl 

irptct ,lhl 3 

:22 

sr Dtct, [hi 3 

krow_m*kcol_ni 
kbserv 

hi 



kle_len 
hi 

:10 



'.point back to the first byte of entry 

;check if it is serviced before 

;set the serviced once flag 

:point back to the repeat count 

;and store rot count as per serviced flag 



;call to service the key 

;get ptr to first byte of entry again 
Sendif 
;endif 

•point to next entry 

;until complete list scanned 

;return to exiti code in rom 



o 

o 

•o 



O 



3 

T3 



O 
O 
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sbrts KBSCAN - Scan keyboard and enter detected keys 

ryrsy i i o b« 

input: 
none 

output: 
keylst = contains any keys detected. 



0T74 

0774 2EFF 

0776 CDEFO? 

0779 C8 

077A 2E81 

077C COEF07 



077F E6E3 
0781 0607 



KBSCAN: proc 




LDK 


UOffh 


call 


rdrow 


rz 




LDK 


J trowO_m 


call 


rdrow 


; LDK 


L,I 


; CALL 


RDROW 


; PUSH 


psw 


: LDK 


ItSOh 


: CALL 


rdrow 


; ANi 


08h 


; MOV 


BtA 


: POP 


PSW 


: OR 


B 


and 


lllOOOllb 


LDK 


b»tot_row 



•see if any key pressed 
; return when none 
Jget row 



;reniove ctl/shift and aloha lock 



0783 

0783 2844 *07C9$ 



:10: 



in this toop> reg b contains totrow- current row being scanned 



jrz 



:50 



•if any key is pressed then 



0785 C5 

0786 SF 

0787 3E07 
0789 90 
078A 17 
078B 17 
078C 17 
0780 57 

07 8E oeoo 



push 


be 


mov 


eta 


LDK 


attot_row 


sub 


b 


rai 




ral 




ral 




mov 


dva 


LOK 


c.O 



Jsave loop count 
;e = columns 



!d = row number « 8 
•initialize column counter 



0790 

0790 0838 i 

0792 302F -07C3$ 



; scan this row fron right to left to get the column number 

:15: ;repeat 

srI e (Shift column bit into carry 

jrnc :30 5 if a key is found then 



enter the key whose column number is in c and row*8 is in d 
into the keylst provided the key is not already in list and 
there is an empty slot in the list. 



0794 7A 

0795 31 

0796 C5 

0797 4F 

0798 05 

0799 E5 
079A 0603 
079C 21D4EF 



mov 


atd 


add 


a>c 


push 


be 


mov 


c«a 


push 


de 


push 


hi 


LDK 


b.kl_len 


LOK 


hi, keylst 



•c = key number 

■save de 

•save hi 

• I ength of keyl ist 
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o 


Keyboi 


ird an 


d Conso 


1 e Rou 


tines. 




o 














=. 


079F 


110000 




LDK 


deiO 




07A2 






:18: 






@ 


07A2 


76 






Id 


a.thll 


^ 


07A3 


CB7F 


$ 




bit 


kl_usedta 


M 


07A5 


2807 


*07AE» 




Jrz 


:22 


9 


07A7 


E63F 






and 


Krow_m+kcol_m 


1 

3 


07A9 


B9 






crop 


c 


07AA 


2814 


*07C0i 




jrz 


527 


<D 


07AC 


1802 


''07B0t 




Jr 


:25 


O 

o 


07 AE 






s22: 






3 


07Ae 


5D 






mov 


e, t 




07AF 


54 






raov 


dfh 


$ 


07B0 






:25: 






o 










echo 


kle.len 


o 










inc 


hi 


o 










ENDH 




01 

5' 


07B2 


lOEE 


''07A2$ 




djnz 


:18 


3 








« 


check 


if an erapty entry was 




07B4 


7A 






mov 


a.d 




07B5 


87 






or 


a 




07B6 


CAC007 




jz 


:27 




07B9 


EB 






ex 


de.hl 




07BA 


71 






sto 


ctChn 




07BB 


C3FE 


t 




sbit 


kl.usedithU 




07B0 


23 






inc 


hi 




07BE 


3601 






sto 


OB_ctf tnl J 




07C0 






:27: 








07C0 


El 






poo 


hi 




07C1 


01 






pop 


de 




07C2 


CI 






pop 


be 




07C3 






:30: 








07C3 


OC 






inc 


c 




07C4 


AF 






xor 


a 




07C5 
07C6 


BB 
20C8 


*0790S 




cmp 
jrnz 


e 
:15 
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cund< 



;if entry is used then 

;check with current key 
;exit if this key is in list 

;etse (an empty entry is found) 

;save adrs of empty entry in de 
:endi f 



!naxt entry 

; ti I I list scanned 



;if empty entry was found then 
;hl = empty entry 
;store fie key in the list 
;set used flag 

Jstore debounce delay 
;endif 
Jrestore all regsters 



• endi f 

; increment column number 



07C8 
07C9 
07C9 
07CB 
07CE 



CI 



:50: 



CB25 t 
CDEF07 
1083 *0783$ 



0700 C9 



POP 

sla 
call 
djnz 
ret 



be 



rdrow 
:10 



;until all columns scanned 

;rstore be 
; end if 
■move to next row 



o 

o 

-< 
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O 

o 

3 



O 
o 



07D1 




0701 


E5 


07D2 


F5 


0703 


IF 


0704 


If 


07D5 


IF 


0706 


CDE507 


07D9 


Fl 


07DA 


05 


07DB 


C0E507 


070E 


El 


070F 


C0EF07 


07E2 


A3 


07E3 


El 


07E4 


C9 



:** 






s 


sbrt: 


CHKEY 


: 


input: 




;Reg A 

• 


output: 


Keynum 


:Z ind 


cir 


= 


;Z ind 


set 


s 


CHKEY: 


proc 






push 


hi 




push 


af 




rar 






rar 






rar 






call 


gtmask 




pop 


af 




push 


de 




call 


gtmask 




pop 


hi 




call 


rdrow 




and 


e 




pop 


hi 




ret 





checks if key number is on. 



Key is off. 
Key is on. 



isave callers hi 
;save keynuraber 



;r ight justify row number 

;get key number 

Ssave row mask 

:get col mask (col num is in bits 0..2) 

;move row mask to 1 

;get row of keys adrsed by 1 

iz ind = value of key 



o 
o 
■a 

•< 
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sbrt: GTMASK - generates mask with one bit set. 

input: 

= bit number (0..T) 

output: 

= mask 



3 


07E5 






GTMASK: 


proc 




O 

o 


07E5 
07E7 


lEOl 
E607 






LDK 
and 


e.l 

7 


3 
■o 


07E9 






:10: 






c 


07E9 


C8 






TZ 




a 


07EA 


CB23 


$ 




sla 


e 


9 


07EC 


30 






dec 


a 


f 


07ED 


18FA 


*07E9$ 




Jr 


:10 

















o 

o 
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sbrt: RDROW - Reads a row of keys 

input: 
reg L = lower 8 bits of adrs to read the row 

output: 
reg A = row value 



O 
o 

3 



O 
o 



07EF 




ROROW: 


proc 




07EF 


2622 




LDK 


hf high(h.key) 


07F1 


70 




WOV 


A<L 


07F2 


ED4F 


S 


MOV 


R.A 


07F4 


7E 




td 


atChl] 


07F5 


EEFF 




xor 


Offh 


07F7 


C9 




ret 





;hi 



prt adrs for given row 



• invert val ues 
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O 
o 



start: KBSERV - services the key 
input: 

reg A = keynumber 
CSP]-4 = pointer to keylst entry (used for slide fnc only) 
preserves reg 8 





= 008D 




= OOBB 




= 008A 




= 008C 




= 005B 


07F8 




07F8 




OTFS 


5F 


07F9 


1600 


07FB 


21C308 


07FE 


19 


07FF 


TE 


0800 


FE21 


080Z 


3B1F *0823t 


0804 


F5 


0805 


2E01 


0807 


CCEF07 


080A 


F5 


OSOB 


2E80 


0800 


CDEF07 


0810 


E608 


0812 


5F 


0813 


Fl 


0814 


B3 



lft_arw equ 
rt_arw equ 
up.arw equ 
dn_arw equ 
hm_scrn equ 



8dh 
8bh 
8ah 
8ch 
■t* 



KBSERV: 



0815 5F 

0816 Fl 

0817 C853 » 
0819 202E *0849$ 

0818 CB63 $ 
0810 2014 *0833$ 
081F CB5B S 
0821 2004 *0827$ 



0823 

0823 325EEF 

0826 C9 
0827 

0827 FE61 

0829 38F8 *0823$ 

082B 

082B FEBO 

0820 30F4 -0823$ 

082F 

082F EE20 

0831 18F0 *0823$ 



!IZ: 
!25: 
127: 
:28: 



PR DC 

setup hi to point to keycode table entry for this key 
mov eta 

•used here and later 



LOK 


d»0 


LOK 


hl«kycdtb 


add 


hlide 


Id 


a.Chn 


crap 


• • + ! 


Jrc 


:12 


push 


af 


LOK 


Ul 


call 


rdroH 


PUSH 


AF 


LOK 


Lf SOH 


CALL 


ROROW 


AN I 


8 


MOV 


E.A 


POP 


AF 


OR 


E 


mov 


e<a 


pop 


af 


bit 


ct l_kyte 


jrnz 


:50 


bit 


shft_kyte 


jrnz 


:30 


bit 


alph_kyf e 


jrnz 


:25 



•ignore shift/ctl etc for chars less than 21h 



;row adrs 

•get row containing ctlishift and alpha key 



;restora keycode 
;go process ct I key 
;go process shi ft key 
!go process alpha key 



store key code into Ikey 



sto 


atl 


ret 




cmp 


•a* 


jrc 


:1Z 


cmp 


80h 


jrnc 


sl2 


xor 


20h 


jr 


sl2 



:process alpha key 

•exit when less than 'a'. Alpha has no effect 

;or when >= 80h 

•fold char to upper case 



9 



Keyboard and Console Routines* 

0833 :30s 

0833 FE51 

0835 30F* •0828$ 

0837 FeSB 

0839 3806 "OS^IS 

0«3B 20F2 »082F$ 

083D 3E5D 

0S3F 18E2 *0823$ 

0841 :35: 
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crap 


•a* 


Jrnc 


:27 


cmp 


•C 


Jrc 


:35 


Jrnz 


:28 


LDK 


a,'l* 


jr 


:1Z 



C:SDROMA .ASH 

iprocess shift key 

•goto alpha when char > "a* 

•goto process shift numerics etc 
:invert shift bit for 'X* 



o 
o 

1 


0841 


5F 




mov 


eta 


0842 


21D408 




LDK 


hl.shf t_tb 


3 


0845 


19 




add 


hl,de 


o 


0846 




:37: 






3 


0846 


7E 




Id 


a«Ch|] 




0847 


18DA •0S23t 




jr 


:12 



•convert C to D 

chars • to > (ascii codes 27h to 3eh) are converted using 
the shft tb 



Sd=D from before 



0849 



'50: .process control key 

i if char is between a««z then turn off the 3 high order 

i bits. 

i if char is between •»•..•?• it is translated as per table ctl_tb' 

i if char is the arrow keys or the ■]'/*I' key the slide functions 

• are called* 



0849 


PESO 




cmp 


Ift.arw 


0848 


2833 


*0880t 


jrz 


slidel 


0840 


FE8B 




crp 


rt_arw 


084F 


2833 


»0884» 


Jrz 


s 1 i der 


0851 


FE8A 




cmp 


uo_arw 


0853 


2840 


"0895* 


Jrz 


si ideu 


0855 


FE8C 




cmp 


dn_arw 


857 


2840 


*0899$ 


Jrz 


si ided 


0859 


FESB 




cmp 


hm_scrn 


0858 


2850 


"■OSADS 


jrz 


dohome 


0850 


C653 


$ 


BIT 


shft_ky»e 


oasF 


2803 


*0869t 


Jrz 


:52 


0861 


FE2F 




cmp 


•/• 


0863 


2004 


"0869$ 


jrnz 


:52 


0865 


3E7F 




Idk 


a»07fh 


0867 


13SA 


•0323$ 


jr 


S12 


0369 


FE40 


S52: 


cmp 


• at 


036B 


3308 


*0875$ 


jrc 


:54 


086D 


Fc78 




crap 


•z' + l 


086F 


3082 


"0823$ 


jrnc 


:12 


0871 


E61F 




and 


Ifh 


0873 


13AE 


•0823* 


Jr 


!12 


0875 




:54: 






0875 


FE2C 




cmp 


•.' 


877 


38AA 


•0823$ 


jrc 


:12 


0879 


21E708 


LDK 


hl,ctl_tb- 


087C 


5F 




mov 


e<a 



;test for cnti shi ft 
Sif not 
;is it ? 
Jif not •?' 
• del eat key 



Jgoto translate chars from table 



087D 19 



•no translation if char below *«• 
!d=0 from above 



add 



n I tde 
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O 

o 



087E 


18C6 »0846$ 




jr 


:37 






; 


slide 


functi ons. 


0880 




sHdel: 






0380 


oeo2 




LDK 


C.2 


0882 


1802 *0886$ 




jr 


:70 


088* 




s 1 i der : 






0384 


OEFE 




LOK 


C.-2 


0886 


3A61EF 


:70i 


Id 


atpi aad 


0889 


81 




add 


a»c 


088A 


4F 




HOV 


CiA 


088B 


CD6409 


:72i 


CALL 


OP AD 


0888 




:74: 










» 


set repeat count for 


0S8E 


Dl 




pop 


de 


08BF 


El 




pop 


hi 


0890 


3603 




sto 


sld.rct.thM 


0892 


E5 




push 


hi 


0893 


05 




push 


de 


0894 


C9 




ret 




0895 




si ideu: 






0895 


OEOl 




LDK 


c.l 


0897 


1802 *0a9B* 




Jr 


!76 


0899 




si ided: 






0899 


OEFF 




LDK 


c.-l 


0898 




:76: 






0898 


2162EF 




LOK 


hUpiabd 


089E 


7E 




Id 


atChI] 


089F 


81 




add 


asc 


08*0 


E61F 




and 


Ifh 


08A2 


*F 




mov 


c<a 


08A3 


7E 




Id 


atthll 


08A* 


E6E0 




and 


OeOh 


08A6 




S7B: 






08A6 


Bl 




or 


c 


08A7 


4F 




roov 


c*a 


08A8 


C07109 




call 


opbd 


OSAB 


18E1 *088ES 




jr 


:74 


08AD 




dohome: 







;get horizontal coord* 



;FUNCTI0N PIA 



these keys Coverride count set by the kbdrwr) 
:get return adrs 
;poJnter to repeat entry 
irepeat count for slide Keys 

;restore stack 



•merge new vertoffset to lower 5 bits of 
;piAe 



!raodify current with +l/or-l 



;SET DENSITY BIT 



08A0 


3A61EF 


LO 


A.PIAAD 


08B0 


E601 


ANI 


0000 00018 


0882 


F6EA 


OR I 


VFLO 


0884 


4F 


MOV 


C>A 


08B5 


CD6409 


CALL 


OPAO 


08B8 


3A62EF 


Id 


A.piabd 


08BS 


E6E0 


AND 


OEOH 


08BO 


4F 


HCV 


C.A 


08BE 


3AEFEF 


LD 


A.VRTOFF 


08C1 


18E3 "DBAS* 


Jr 


s78 



;get olo value 

:SAVE DENSITY bit 

;oR in horizontal offset 
;function PIA 



;house keeping bits 



;get last vertical offset 
Sand the vert to also 



o 

o 
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Keyboard and Console Routines. 

; key code translation tables 



a 

O 
o 

3 



O 
o 



08C3 
08C3 


1B097F7F 


kycdtbi 

08 


3C7 


7F0027SB 


DB 


08CB 


31323334 


06 


08CF 


35363738 


OB 


0803 


71776572 


08 


08D7 


7*797569 


OB 


08DB 


61736466 


DB 


08DF 


67636A6B 


OB 


08E3 


7A786376 


DB 


0867 


626E602C 


DB 


08EB 


8A803020 


08 


08EF 


2e706F39 


OB 


08F3 


8B8C2D2F 


DB 


08F7 


3B5C6C3D 


DB 


08F6 
08F8 


2200000000 


shft.tb: 

OB 


0900 


3C5F3E3F29 


OB 


0905 


2140232425 


DB 


090A 


5E262A2800 


OB 


090F 


3A002BOO 


DB 


0913 
0913 


7B1F7D7E 


ctl_tb: 

OB 


0917 


8081828384 


03 


091C 


8586878889 


DB 


0921 


00000060 


DB 



esc 
ere 
•1* 
.5. 

•q' 
•t» 
•a* 

•g. 

•z* 

•b* 

8ah 
•.' 

8b h 



•<• 



•<* 

80h 
85h 
OOh 



tab. ere. ere 

cr» ••••, •[• 

•2'. '3*. •4' 

'6'. •7«. 'B' 

•w'. 'e*. 'r' 

.y., #„., .,-. 

•s*. 'd'. 'f 

•h', 'j', 'k' 

•X'f 'c*. 'v* 

•n'. 'm't •,' 

8dh, 'O** • • 

•p', 'o'. '9' 

8ch, •-•» •/• 
•\'. •••« •=• 

OOh. OOh. OOh. OOh 

•_•» '>•» •?•» «J« 

•3'. «#•» •*•. •%• 

•£•, •*•» •(•, OOh 

OOh. •+•. OOh 

•_«-40h. •>•. •-• 
aih. 82h. 83h. 84h 
86h« 87ht 88h. 89h 
OOh. OOH. 60H 



3 



O 

o 
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Hardware PJO function processors 
0925 



CsSDROHA 



.&SK 



0925 7A 

0926 8C 

0927 CO 

0928 7B 

0929 BD 
092A CO 
092B 37 
092C C9 



*t4J 

CDEHLS 

;Comt)are OE to hl as unsigned integers. 

;entry 

:OEtHL set to values to compare 



;exiT 










:Zbit 


set if 


DE 


= 


ML 


:Cbit 


set if 


DE 


< HL. 




5 


uses 

MOV 

CMP 

RNZ 

MOV 

CMP 

RNZ 

STC 

RET 




AF. 

A,0 

H 

A,E 

U 


;if D 

:if DE 



.ne. HL 



o 

o 

5 



o 

o 

3 



O 
o 
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0920 




0920 


C5 


092E 


*F 


092F 


3EB5 


0931 


3D 


0932 


40 


0933 


49 


0934 


C23109 


0937 


00 


0938 


C22F09 


093B 


CI 


093C 


C9 



DELAY: 






;'N» Mitllseconds 


; ENTRY 






:a 


= 


Number o 


;SCLFRE 


s 


IFreq/io 


;exit 






:none 


Proc 






PUSH 


BC 




MOV 


C«A 


:l: 


LDK 


A.SCLFRE 


: ML OOP: 


DEC 


A 




MOV 


B.B 




MOV 


C,C 




JNZ 


:HL00P 




DEC 


C 




JNZ 


:l 




POP 


BC 




RET 




JSCLFRE 


K 


2000/22 



Number of Milliseconds to delay 



J(4 tics) 
;(4 tics) 
:(4 tics) 
;(10 tics) If 1 ms not elapsed 



•If requested msec not done 
trestore registers 



:.««defined in OCCTXT.ast 



o 

o 
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0930 



FILLZ: 

JFill block of meraory with byte value. 

tENTRY 

JOE=LENGTH TO broadcast character 

;C =character TO broadcast 

SHL=FWA TO START broadcast 



a 

O 

o 

3 

T3 



O 
O 



0930 


OEOO 


093F 


7B 


0940 


82 


0941 


C8 


09*2 


71 


0943 


IB 


0944 


78 


0945 


82 


0946 


C8 


0947 


42 


0948 


48 


0949 


54 


094A 


5D 


0948 


13 


094C 


EOBO 


094E 


C9 



;exit 








;fill done 








Lit 


CO 


;FILL WITH ZERO 


FILLC: HOV 


AfE 






OR 


D 






RZ 




* 


return here if broadcast bytes 


STQ 


c.thn 


; 


1st byte 


DEC 


DE 






HOV 


A,E 






OR 


D 






RZ 




• 


return here if broadcast 1 byte 


HCV 


8.0 






HOV 


C<E 


» 


EC := Icountl 


MOV 


D.H 






MOV 


E,L 






INC 


DE 


• 


OE := HL + 1 


LOIR 




; 


overlapDing move 


RET 









o 

o 


Hardware PIO 


1 


094F 




5 






e 


094F 


3E03 


S 


0951 


32012C 


s 


0954 


3EFF 


o 


0956 


32002C 


§■ 


0959 


3600 


3 


09SB 


32032C 


o 


095E 


3EFF 


o 

3 

? 


0960 


32022C 


0963 


C9 


o 
o 
■o 

o 







SORCIM 808x Assembler ver 



SPAO: 

•Set PIA for autput 



LDK 


A«03h 


STO 


A»H.VI0+1 


LDK 


A.OFFh 


STO 


A.H.VIO 


LDK 


A,0 


STO 


A,H.V!0*3 


LOK 


A,0FFh 


STO 


A.H.VID+2 


RET 
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;CRAl-Ot Interrupt inputs CAl 
;set data direction 

;set all A lines as output 



•set all B tines as output 



o 

o 
■o 



O 



3 
■a 



O 
o 
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0964 



0964 

0964 3E07 

0966 3Z012C 

0969 79 
096A 3261EF 
0960 32002C 

0970 C9 



OPAD: 
Output data to pia A register 
PIA definition. 

76543210 

f horizontal offset iOOl 

+ — « — 1 — ♦— ••■ — ♦ — ♦ — ♦ — + 
»NOTE The DOIdouble density! bit is inverted and the Jumper must be 

If the bit is LOM double density is set if it is HIGH single 
«NOTE Bit of "PIAAO" : 

set = single density 

reset = double density 



installed on the 
density is set. 



PC board. 



ENTRY 






C 


SS 


data 


EXIT 






NONE 


PROC 






LOK 


A. 4*3 




STQ 


&«H.VI0+1 




HQV 


A.C 




STO 


AtPIAAO 




STO 


AtH.VIO 




RET 





• send data 



o 

o 
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0971 



1 






9 

3 
•o 

c 






9 


0971 




1 


0971 


3E04 


0973 


32032C 


o 

3 


0976 


^9 




0977 


3262EF 




097A 


32022C 




097D 


C9 



OPBO: 

• PIA definition. 

» 76543210 

• ♦--♦ — 1 ♦ — «--'» — + — + — * 

• iOliDOI^Gt vert offset J 
; •♦— ♦ — -I — ♦ — «--« — ♦ — 4 — + 



JENTRY 






;c 


s 


data 


;exit 






:none 


PROC 






LOK 


A, 4 




STO 


A>H.VI0+3 




HOV 


A,t 




STO 


A.PIABD 




STO 


AtH.VI04-2 




RET 





Ssend data 



o 

o 



SHIEEE.ASH - 
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I ENTERED 05/01/81 FROM TNH XEROX. SEH. I 
, ♦ 



o 

O 
o 

3 



a 

o 



:LAST EDITED AT 09:29 ON 11 NOV 80 
;THERE ARE FOUR COHMANOS TO THE 6821 



00 PERIPHERAL/DIRECTION REGISTER A 

01 CONTROL REGISTER A 

10 PERIPHERAL/DIRECTION REGISTER B 

11 CONTROL REGISTER B 



CPDRA 
CCRA 
CPOf^B 
CCRS 



:BIT 2 OF THE CONTROL REGISTER <A AND 6) ALLOWS SELECTION OF EITHER 
;A peripheral interface REGISTER OR A DATA DIRECTION REGISTER. 
;A "1" IN BIT 2 SELECTS THE PERIPHERAL REGISTER- 

STHE TWO DATA DIRECTION REGISTERS ALLOW CONTROL OF THE DIRECTION 
;0F DATA THROUGH EACH CORRESPONDING PERIPHERAL DATA LINE. 
:A data DIRECTION REGISTER BIT SET AT "0" CONFIGURES 
:THE corresponding peripheral data line AS AN INPUT. 

:A reset AT POWER UP HAS THE EFFECT OF ZEROING ALL PIA REGISTERS. 
;THIS WILL SET PA0-PA7. PB0-PB7, CA2, AND CB2 AS INPUTS, 

;anc all interrupts disabled. 

ISIGNALS ATN, REN. AND IFC WILL BE DRIVEN LOW 
JUNTIL INITIALIZED BY SOFTWARE. 

;DATA DIRECTION IS ALWAYS SET FOR OUTPUT FOR THE DATA REGISTER. 

;DATA must BE SET TO ALL ONES WHEN INPUTTING. 

;TH<= INTERFACE IS IN SOURCE HANDSHAKE MODE IF DATA ENABLE CP80) 

;IS SET TO "0". AND IN ACCEPTOR HANDSHAKE NODE IF SET TO "1". 

;WHEN SWITCHING FROM SOURCE TO ACCEPTOR HANDSHAKE. 

!ATN WILL ALWAYS BE LOW. 

STAKE CONTROL CAN ONLY BE CALLED FOLLOWING A GO TO STANDBY. 

;AFTER a fatal error, perform an IFC RESET. 

;STANDARD VALUES USED: 

;CCRA 0011(IFC)tDIR)10 

;CCRB 0011(REN)(DIR)00 

;CPDRA SOURCE 



;CPDRA ACCEPTOR 
;CPDRB SOURCE 
:CPDRB ACCEPTOR 



DIRECTION 
DATA 

DIRECTION 
DATA 

DIRECTION 
DATA 

DIRECTION 
DATA 



llll.llll 
DATA 

llll.llll 
llll.llll 

ODll.llll 

OOOA_0010 

1101_0111 
0100_0101 



;a = ATN 



o 

o 



BHIEEE.ASM - 
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;PIA SIGNAL DEFINITIONS: 

• SLJ. SIGNALS ARE LOW ON THE ittt SUS WHEN PIA REGISTER CONTAINS 



3 
CD 

O 

o 

3 

T3 

C 

? 

O 
o 

■3 



PAO 


DIO 


I 




PAl 


010 


2 




PA2 


010 


3 




PA3 


DIO 


4 




PA« 


010 


5 




PAS 


010 


6 




PA6 


010 


7 




PA7 


DIO 


3 




CAl 


SRQ 






CAZ 


IFC 






PBO 


ENABLE 


DATA CUT 


PBl 


ENABLE 


NOAC/NRFO 


PB2 


ENABLE 


EOI/DAV 


PB3 


EOI 






PB4 


ATN 






PBS 


DAV 






PB6 


NDAC 






PB7 


NRFD 






CBl 


NOT 


USED 


CB2 


REN 







(ENABLED WHEN "O") 
(ENABLED WHEN "O") 
(ENABLED WHEN "0") 



;CONTRQL WORD FORMAT 



;[ 



11 



][ 



:{IRQA1]CIRQA2U 
:[IRC)B1]CIRQ82]I 



IRQAl 





IR0A2 





CA2 


110 




111 


DORA 







1 


CAl 


10 


IRQBl 





IRQB2 





CB2 


110 




111 


ODRB 







1 


CBl 


00 



It 



]{ 



]C 



3C 



][ 



CA2 CONTROL 
CB2 CONTROL 



U DORAJt CAl CONTROL] 
IC 0DR8U CBl CONTROL! 



INTERRUPT FLAG SET BY FALL OF 

NOT USED 

SET IFC HIGH 

SET IFC LOW 

R/W DATA DIRECTION REGISTER A 

R/H PERIPHERAL REGISTER A 

SET IRQAl HIGH ON RISE OF SRQ 

NOT USED 

NOT USED 

SET REN HIGH 

SET REN LOW 

R/H DATA DIRECTION REGISTER B 

R/W PERIPHERAL REGISTER B 

NOT USED 



SRQ 



BMIEEE.ASH - 



O 
o 

3 



o 
o 



097E 
097E 
D97F 
098D 
0982 



0984 
0987 
0989 
098B 
098E 
0990 
0991 
0994 
0997 
0999 
099B 
09 9E 
09A0 
09A2 
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BIOS CAUL l: CONTROL OUT 

CAN BE CALLED WHILE IN ANY STATE. 

EXITS IN THE CONTROLLER STANDBY STATE <ATN HIGHJ. 
SOURCE HANDSHAKE MODE 

PARAMETER PASSED IN REGISTER Cs 

BIT IF "1". THE IFC SIGNAL IS SET LOW FOR 100 MICRO-SEC 
AND ALL PIA SIGNALS ARE INITIALIZED 



IE. CO: 



F5 

E5 

CB41 ( 

28ZB *09AF$ 



210129 

363A 

3EFF 

320029 

363E 

AF 

320029 

210329 

3630 

3E3F 

320229 

3634 

3E02 

320229 



BIT 2 


1 







X 


NO ACTION 


1 





SETS REN HIGH 


1 


1 


SETS REN LOW 


PROC 






PUSH 




AF 


PUSH 




HL 


BIT 




O.C 


JRZ 




SB1C20 


IZE ALL 


IEEE-488 SIGNAL 


LK 




HL.CCRA 


STO 




OOll_1010B,CHL3 


LK 




A.llll.llllB 


STO 




A.CPDRA 


STO 




0011_1110B,[HL] 


XOR 




A 


STO 




AtCPDRA 


LK 




HL.CCRB 


STO 




0011 0000B.CHL3 


LK 




A,0011_11118 


STO 




A.CPDRB 


STO 




0011.0 1008. [HL] 


LK 




A,0Q00_0010B 


STO 




A.CPDRB 



:CHECK IFC SUB-CDHMAND 



IFC-aUT LOW 



;ENA3LE SRQ AND SET 
lOIRECT DATA OUT 



;SET DATA TO ZERO 



:set ren-out high 

:direction for source handshake 



;VALUES for source HANDSHAKE 



09A5 
09A7 
09A8 
09AA 
09AC 
09AF 
09B1 



09B3 
0985 
09B7 
09B9 
09BB 
098E 
09BF 
09C0 



:LEAVE IFC LOW FOR 100 MICRD-SEC 
3E19 LK A, 25 SDELAY 100 MICRO-SEC 

3D :B1C10: DEC A 

20FD "09^1* JRN2 :S1C10 

3E36 LK A.OOll.OllOa 



320129 
CB51 * 
280B *093£$ 



LK 

STO 

!B1CZ0: BIT 

JRZ 

; SET/CLEAR REN 



3E30 LK 

CB49 » BIT 

2802 »09BB» JRZ 

3E38 LK 

320329 :B1C30s STO 

El :BlC40s POP 

Fl POP 

C9 RET 



A.CCRA 

2tC 

:B1C40 



A,O0Il_0OOOB 

l.C 

:B1C30 

A,0011_1000B 

A.CCRB 

HL 

AF 



;SET IFC HIGH 

;CHECK REN SUB-COMMAND 



o 

o 
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s 










f 


09C1 


lE.SIs PROC 




3 


09C1 


E5 


PUSH 


Ht 


o 


09C2 


3A0029 


LD 


A.CPDRA 


O 

3 


09C5 


210229 


LK 


HL.CPDRB 


09C8 


CB8E S 


C8IT 


l.tHL] 




09CA 


CBCE S 


SBIT 


l.tHLJ 


f^ 


09CC 


3A0129 


to 


A.CCRA 


6 


09CF 


£690 


AND 


1000_OOOOB 


1 


0901 


07 


RLC 


A 


5 


0902 


El 


POP 


Ht 


o 


0903 


C9 


RET 





BIOS CALL 2: STATUS IN 

CAN 3E CALLED ONLY WHILE IN SOURCE HANDSHAKE MODE. 
BIT OF REGISTER A SET IF SRC IS LOW 



;CLEAR IRQAl 

; PULSE ENABLE ndac/nrfd 



!SET SRQ VALUE IN A 



o 

o 



a 

O 
o 

3 
■o 



O 
o 



BMIEEE.ASM - 



0904 


F5 


0905 


3E02 


0907 


3Z0Z29 


09DA 


AF 


090B 


320029 


090E 


Fl 


09DF 


C9 
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BIOS CALL 3: GO TO STANDBY 

CAN 3E CALLED ONLY WHILE IN SOURCE HANDSHAKE MODE 
NO PARAMETERS PASSED 



lE.GTSs 



PROC 




PUSH 


AF 


LK 


AiOOOO OOIOB 


STO 


AfCPDRB 


XOR 


A 


STO 


A.CPDRA 


POP 


AF 


RET 





;SET ATN HIGH 
!FLOAT DATA BUS 



o 
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;bios call 4: 



TAKE CONTROL 



O 



O 

o 

3 

T3 



o 

o 
■3 
o 

I 
o 



09E0 




09E0 


E5 


09E1 


210229 


09E4 


CB41 S 


09E5 


2022 ''OAOAS 


09E8 


3607 


09EA 


3A0329 


09ED 


CB97 $ 


09 EF 


320329 


09F2 


3607 


09F4 


CBD7 $ 


09F6 


320329 


09F9 


3685 


09FB 


3E19 


09FD 


CB6E S 


09FF 


2807 *0A08t 


OAOl 


30 


0A02 


20F9 *09FD» 


0A04 


3E81 


0A06 


1816 *0A1ES 


OA03 


36C5 


OAOA 


CBE6 $ 


OAOC 


3A0329 


OAOF 


CB97 $ 


OAll 


320329 


0A14 


363F 


0A16 


CBD7 $ 


0A18 


320329 


OAIB 


3612 


OAID 


AF 


OAIE 


El 



: (ATN HIGH!. 

! EXITS IN THE CONTROLLER ACTIVE STATE C ATN LQW)» 

; SOURCE HANDSHAKE HODE. 

:BIT OF REGISTER C SET TO TAKE CONTROL ASYNCHRONOUS 

;ERR0R CODE RETURNED IN REGISTER A. 

lE.TCs 



PROC 

PUSH 

LK 

BIT 

JRNZ 



HL 

HL.CPORB 
0<C 
:B4C30 



;TAKE CONTROL SYNCHRONOUSLY 



STO 
LO 

CBIT 
STO 
STO 
S8IT 
STO 
STO 
LK 
:B4C10: BIT 
JRZ 
DEC 
JRNZ 
LK 
JR 

!B4C20: STO 
$ ;B4C30! SBIT 



OOOG.OlllB.IHLl ;DISABLe DRIVERS 

AtCCRB 

2*A 

AtCCRB 

110l_0111B,tHL] :DIRECTI0N REGISTER 

2<A 

A.CCRB 

1000_0101B,tHL) !SET NRFD LOW 

Af25 

5»tHL] 

:B4C20 

A 

:B4C10 

AtlOOO_0001B 

!84C40 



;data valid has dropped 

;wait 100 hicro-sec 

;set data valid timeout error 



1100_0101BtCHLl ;SET NDAC LOW 



4t[HLl 



;SET ATN LOW 



; SET-UP FOR SOURCE HANDSHAKE 
LO 

CBIT 
STO 
STO 



:B4C40: 



OAIF C9 



SBIT 

STO 

STO 

XOR 

POP 

RET 



A.CCRB 

2»A 

A.CCRB 

0011_llllB.tHLl SDIRECTION REGISTER 

2tA 

AtCCRB 

0001_0010BtCHL] ;CONTROL SIGNAL INITIAL VALUE 

A ;CLEAR ERROR CODE 

HL 



o 

o 



BMIEEE.ASM 
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BIOS CALL 5: OUTPUT INTERFACE MESSAGE 

CAN BE CALLED WHILE IN ANY MODE OR STATE 

EXITS IN THE SOURCE HANDSHAKE MODE WITH ATN LOW. 

MULTI-LINE MESSAGE IN REGISTER C 

ERROR CODE RETURNED IN REGISTER A 



3 
■a 



O 
o 



0A20 

0A20 E5 

0A21 210229 

0A24 CBE6 

0A26 CB46 



IE.OIM: PROC 
PUSH 

$ SBIT 

S BIT 



0A28 2825 »0A4F$ 



0A2A 3617 

0A2C 3A0329 

0A2F C397 » 

0A31 320329 

0A34 363F 

0A36 CBD7 $ 

QA33 320329 

0A3B AF 

0A3C 320029 

0A3F 3612 

QA41 180C *0A4Fi 



JRZ 



HL 

HL.CPDR3 

4.CHL1 

O.tHLl 

lE.SHK 



;SET-UP FOR SOURCE HANDSHAKE 
STD 
LD 

CBIT 
STO 
STO 



;SET ATN LOW 



;OISABLE DRIVERS 



0001_0111B.CHL] 

A.CCRB 

2, A 

AtCCRB 

0011_1111B,[HL] ;0IRECTION REGISTER 
SBIT 2. A 
STO A.CCRS 

XOR A ;FLCAT EXTERNAL DATA BUS 

STO A.CPORA 

STO 0001 0010B,tHL] ;CONTROL SIGNAL INITIAL VALUE 
JR lE.SHK 



o 

o 
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JBIOS CALL 6: 



OUTPUT DEVICE MESSAGE 



UAN Bt CALLED ONLY WHILE IN THE SOURCE HANDSHAKE MODE 
WITH ATN HIGH OR LOW. 

EXITS IN THE SOURCE HANDSHAKE MODE WITH ATN HIGH. 



o 

o 

3 

I 








:eoi re 


CUE ST I^ 


1 REGISTER B 








5 ERROR 


CODE RETURNED IN REGI 


O 
o 


0A43 






IE.OOH: 


PROC 




0A43 


E5 






PUSH 


HL 


•3 
o 


0A44 


210229 




LK 


HL.CPDRB 


£ 


0A47 


CBA6 


$ 




CBIT 


4,tHL] 


o 


0A49 


CB40 


$ 




BIT 


OtB 


3 


0A4B 


2802 


*0A4F$ 




JRZ 


IE.SHK 




0A4D 


C80E 


i 




SBIT 


3>tHL] 










; PERFORM SOURCE 


HANDSHAKE 




0A4F 


C36E 


$ 


IE.SHK: 


BIT 


5,tHL3 




0A51 


201B 


*0A6E$ 




JRNZ 


:86C50 




0A53 


79 






MOV 


A,C 




0A54 


320029 




STO 


A.CPDRA 




0A57 


3E0A 






LK 


A, 10 




0A59 


CB7E 


S 


IB6C20! 


BIT 


7,tHL] 




0A5B 


2 807 


*0A64$ 




JRZ 


:B6C30 




0A50 


30 






DEC 


A 




0A5E 


20F9 


*0A59t 




JRNZ 


:B5C20 




0A60 


3E82 






LK 


A,1000_0010B 




0A62 


181F 


*0A83$ 




JR 


:S6C80 




0A64 


CB76 


t 


:B6C30: 


BIT 


6.1HL3 




0A66 


2004 


''0A6CS 




JRNZ 


:B6C40 




0A68 


3E81 






LK 


A, 1000 OOOIS 




0A6A 


1817 


*0A83$ 




JR 


:86C80 




0A6C 


CBEE 


S 


!B6C40: 


SBIT 


5,[HL1 




0A6E 


3EFF 




:B6CS0: 


LK 


A, 255 




0A70 


CB76 


s 


:B6C60: 


BIT 


6.tHL3 




0A72 


2807 


''0A7B$ 




JRZ 


!B6C70 




0A74 


3D 






DEC 


A 




0A75 


20F9 


•0A70$ 




JRNZ 


:B6C60 




0A77 


3E84 






LK 


A>1000 OlOOB 




0A79 


1808 


*0A83$ 




JR 


:86C80 




0A76 


CBAE 


s 


:B6C70: 


CBIT 


5,[HL] 




0A7D 


CB9E 


t 




CBIT 


3ttHL] 




DA7F 


AF 






XOR 


A 




0A80 


320029 




STO 


A.CPDRA 




0A83 


El 




:B&C80: 


POP 


HL 




0AS4 


C9 






RET 





;SET ATN HIGH 

;CHECK IF EQI REQUESTED 



OAC TIMEOUT RE-ENTRY 
PLACE DATA ON BUS 



;READY for DATA 

:WAIT FOR 100 MICRO-SEC 
;SET RFD TIMEOUT ERROR 



;OATA ACCEPTED LOW 

;SET DEVICE NOT PRESENT ERROR 



:SET DAV LOW 



JDATA ACCEPTED 

;WAIT 1000 MICRO-SEC 
;SET DAC TIMEOUT ERROR 



;SET DAV HIGH 
;SET EOI HIGH 
;REM0VE DATA FROM BUS 



BMIEEE.ASH 
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;9I0S CALL 7: INPUT DEVICE MESSAGE 

! CAN 8E CALLED WHILE IK ANY MDOE OR STATE 

5 EXITS IN THE ACCEPTOR HANDSHAKE MODE WITH ATN HIGH. 

:OEVICE MESSAGE RETURNED IN BOTH REGISTERS A AND H 
5ERR0R CODE RETURNED IN REGISTER L 



0A85 lE.IDH: 

0A85 OS 

0A86 E8 

0A87 210229 

0A8A CB46 * 

0A3C 201A *0AA8i 



0A8E 
OA90 
0A93 
0A95 
0A93 
0A9A 
0A9C 
0A9F 
OAAl 
0AA4 
0AA6 



PR DC 

PUSH 

EX 

LK 

BIT 

JRNZ 



DE 

DEtHL 

HL.CPORB 

O.IHLI 

SB7C10 



;SAVE RE-ENTRY DATA 



3617 

3A0329 

CB97 

320329 

3607 

CBD7 

320329 

3EFF 

320029 

3655 

36*5 



SSE7-UP FOR ACCEPTOR HANDSHAKE 

STD OOOl.OlllB.tHLI ;OISABLE DRIVERS 

LD AiCCRB 

CBIT 2. A 

STD A.CCRB 

STO llOl.OlllB.CHLl 

SBIT 2. A 

STO A.CCRB 

LK A,1111_U118 

STO A.CPDRA 

STO OlOl.OlOlB.tHL] 

STO 0100_0101B.tHL3 



:direction register 



;FLaAT INTERNAL DATA 8US 

SCONTROL signals INITIAL VALUE 
;SET ATN HIGH 



;PERFORM ACCEPTOR HANDSHAKE 



0AA8 CB76 



$ :B7C10: BIT 



QAAA 
OAAC 
OAAE 
OABO 
0AB2 
0AB4 
0A35 
0AB7 
OABA 

OABC 
0A3E 
OACl 
0AC2 
0AC4 
0AC6 
0AC8 
OACA 
OACC 
OACE 
OAOO 
0AD2 
0AD3 
0AD5 
0AD7 
0AD9 



2820 *OACC» 

CBBE i 

3E0A 

CB6E S 

2008 *OABC$ 

30 

20F9 ''OABOt 

118200 

1821 *0ADD» 

CBFE » 

3A0029 

57 

lEOO 

CB5E i 

2802 *0ACA$ 

lEOl 

CBB6 S 

3EFF 

CB6E i 

2809 *0A0ai 

30 

20F9 *0ACE$ 

CBD3 i 

CBFB i 

1802 "OADDt 



JRZ 
CBIT 
LK 
!B7C20: BIT 
JRNZ 
DEC 
JRNZ 
LK 
JR 



:37C30: 



OAOB CBF6 
OAOO EB 



SBIT 
LO 
MOV 
LK 
BIT 
JRZ 
LK 
:B7C*0: CBIT 
:B7C50: LK 
:B7C60: SIT 
JRZ 
DEC 
JRNZ 
SBIT 
SBIT 
JR 

SB7C705 SBIT 
;B7C80s EX 



6.tHLl 

!B7C50 

7,CHL] 

ArlO 

S.tHL] 

:B7C30 

A 

:B7C20 

OE.IOOO OOIOB 

SB7C80 

7.tHL] 

A.CPDRA 

D.A 

E.O 

3.IHL] 

SB7C40 

E.l 

6tCHLl 

A. 255 

S.tHL] 

:B7C70 

A 

SB7C60 

2.E 

7,£ 

:B7C80 

&.CHL] 
OE.HL 



JOATA INVALID TIMEOUT ERROR RE-ENTRY 
;SET NRFO HIGH 



:DATA VALID 

5WAIT 100 MICRO-SEC 

;SET DATA VALID TIMEOUT ERROR 



jset nrfo low 
;reao data 



;reao eoi 



;SET NOAC HIGH 



;data VALID dropped 

;WAIT 1000 MICRO-SEC 

:SET DATA INVALID TIMEOUT ERROR 



;SET ndac low 

;M0VE RESULTS TO REGISTERS A AND HL 



MOV 


AtH 


POP 


DE 


RET 





SORCIM 808x Assembler ver 3.5E <s/55/7= 59:92 Page 85 
O SHIEEE.ASH - lEEE-^SB INTERFACE. C:SDROHA .ASM 

■D 

=. OADE 7C 

3 OADf 01 

e OAEO C9 

ID 

a 
lo 

9 

a- 
o 

3 
a 

O 
o 

3 

T3 

C 

O 

o 



o 
o 
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OAEl 




OAEl 


65 


OAEZ 


21C029 


0AE5 


3E1B 


OAE? 


320229 


OAEA 


36FF 


OAEC 


76 


OAEO 


3600 


OAEF 


210229 


0AF2 


3612 


OAF* 


El 


OAFS 


C9 
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;bios call 33 



PARALLEL POLL 



; CAN BE CALLED ONLY HHILE IN THE SOURCE HANDSHAKE MODE 
; WITH ATN HIGH OR LOW. 

; EXITS IM THE SOURCE HANDSHAKE HODE WITH ATN LOW. 
iPARALLEL POLL VALUE RETURNED IN A. 

lE.PP! 



PROC 

PUSH 

LK 

LK 

STO 

STO 

LO 

STO 

LK 

STO 

POP 

RET 



HL 
HL.CPDRA 

AiOOOi_ioiis ;form parallel poll 

A.CPORB 

1111_1111B,[HL] -.FLOAT INTERNAL DATA BUS 

A.CHLJ ;REAa PARALLEL POLL DATA 

0,[HL3 :RE-STCRE SOURCE HANDSHAKE MODE 

HL.CPDRB 

0001_00105,CHL) 

HL 



SIO - Seri 



SORCIM 808x Assembler ver 
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O 
o 

3 



0AF6 




«t5J 
SIRST: 














SMaster 

;entry 

;c 


reset 


SiO 

Si.S16 or 


SI.S6* for 1200/300 


baud 


0AF6 
0AF6 
OAFS 


3E57 
3200ZA 


SEXIT 

;none 


PROC 

LDK 

STO 


AfSI.MRST 
A.H.SCTRL 


Smaster reset 




OAFB 
OAFC 
OAFF 
OBOZ 


79 

32C1EF 
32002A 
C9 




HDV 
STO 
STO 
RET 


A.C 

AtACIAO 

A,H.SCTRL 


; 1 ast-command 
;select SIO 


cell 



SiO - Seri 
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O 
o 



0BO3 




READER: 










; Input 


one byte 


from reader port 






: ENTRY 










:None 










SEXIT 










!C 


5C 


character read 


0B03 






PROC 




0803 


C0280B 




CALL 


ACISTAT 


0B06 


E601 




AN I 


Sl.RROY 


0S03 


28F9 •0803t 




JRZ 


READER 


080A 


AF 




XRA 


A 


OBOB 


32DAEF 




STO 


A.SERFLG 


OBOE 


3A012A 




LO 


A.H.SREC 


OBIX 


4F 




MOV 


C.A 


0B12 


C9 




RET 





if not ready 



SSET FLAG 

;get data 
!C=A 
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■o 

S 0813 SLST: 

^ ;Get list device status 

f ; ENTRY 

S SNONE 

9 SEXIT 

o ;A = 0. IF NOT READY 

g ;A = OFFh IF READY 

O ;ZBIT = SET IF NOT READY FOR OUTPUT 

o 

■o 0B13 PROC 

S 0913 CD280a CALL ACISTAT 

n 0B16 E602 ANI SI. TROY 

o 0B18 C8 RZ 

■a 

o 

g 0819 F6FF OR I TRUE 

g OBie C9 RET 



o 

o 
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OBIC 



LIST: 

•Output one byte to list port 
; ENTRY 



;c 



character to output 







56X1T 










;NONe 






OBIC 






PROC 




OSIC 


C5 




PUSH 


6C 


OSID 


CD130B 


:l: 


CALL 


SLST 


oazo 


28FB "OBIDS 




JRZ 


:l 


0BZ2 


CI 




POP 


BC 


0823 


79 




MOV 


A,C 


0B2A 


32012A 




STQ 


A.H.SXHT 


0B27 


C9 




RET 





:SAVE CHARACTER 
SGET STATUS 

5REST0RE CHARACTER 
• send chr 
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0323 




ACISTAT 


: 








:return 


STATUS 


OF THE SERIAL PORT 






; ENTRY 










:none 










:exiT 










:a 


s 


STATUS REG 


0828 






PROC 




0828 


3A012C 




LD 


A.H.VlO+1 


082B 


OF 




RRC 


A 


DB2C 


E620 




AN I 


20h 


0B2E 


4F 




MOV 


C.A 


06 2F 


3A002A 




LD 


A.H.SSTS 


0B32 


E60F 




AN I 


ODFh 


0834 


Bl 




OR A 


C 


0B3S 


4F 




MOV 


C.A 


0B36 


3ADAEF 




LD 


A,SERFLG 


0B39 


E601 




ANI 


01 


0B3B 


Bl 




OR A 


C 


0B3C 


32DAEF 




STD 


A.SERFLG 


083F 


C9 




RET 





o 
o 



Disk I/O routines. 
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CsSOROMA .ASM 



OD 

to 
O 



O 
o 

3 



= OOOA 
= EFOO 
= EFOl 
= EFD2 

= EFD* 



*t6] 

NRETRV: = 
SAVTYP = 
ROT_WRTS: 
CCPADR: = 

KEYLST: = 



10 ;nuhber of retrvs must se at least z 

OEFOOH ;oiSK type 

OEFOIH :number of sectors td read cr write 

0EFD2H SThis location is assigned in BIOS 

;and filled in by loader in ROM 
0EF04H :KEY list GOES HERE 



DISK EOUATES 



SORCIM 80Sx Assembler ver 3.56 



<:/55/7= 59:92 Page 93 
C:SDROMA .ASH 



0010 


MSECB: 


= 


OlOH 


0000 


D.RESs 


= 


OOOH 


0010 


O.SEK: 


= 


OlOH 


0020 


D-STPs 


= 


020H 


0040 


D.STPI: 


= 


040H 


0060 


D.STPO: 


= 


060H 


0080 


D.ROS: 


= 


080H 


OOAO 


D.WRTS: 


— 


OAOH 


OOCO 


D.RDA: 


= 


OCOH 


OOEO 


D.RDT: 


= 


OEOH 


OOFO 


O.WRTT: 


= 


OFOH 


OODO 


D.FINT: 


= 


ODOH 



:MULTI SECTOR BIT 



••RESTORE 


:SEEIC 




;STEP 




;STep 


IN 


;ST£P 


OUT 


;reao 


SECTOR 


:mrite 


SECTOR 


SREAO 


ADDRESS 


;reao 


TRACK 


:hrite 


TRACK 


:force 


INTERRUPT 



:DISK REGISTERS 



2100 


D.CKDR: = 


H.FOC 


JDISK COMMAND 


REG 


tWRITEl 


2100 


D.STSR: = 


H.FOC 


;STATUS REG 




(READ) 


2101 


D.TRKR: = 


D.CHDR+1 


:TRACK REG 






2102 


O.SECR: = 


D.CHDR+2 


SSECTOR REG 






2103 


D.DATR: = 


D.CHOR+3 


:OATA REG 




(R/W) 



tSTATUS DEFINITIONS 



0000 
0001 


BS.BSV: 
0S.33Y: 


= 




1 SHL BS.BSY 


0001 
0002 
0002 


BS.DRC: 
OS.INX: 
DS.ORQ: 


= 


1 

1 SHL BS.DRC 

DS.INX 


0002 
0004 
000 « 


BS.TKC: 
DS.TKO: 
OS, LSD: 




2 

1 SHL BS.TKO 
DS.TKO 


0008 


OS.CRC: 


= 


OSH 


0004 
0010 
DOlO 


BS.SEK: 
OS.SEK: 
DS.RNF: 


= 


4 

1 SHL BS.SEK 

OS.SEK 


0020 
0020 


DS.HDL: 
OS.WTF: 


= 


20H 

OS. HDL 


0040 
0080 


DS.HTP: 
DS.NRY: 


=: 


40H 

SOH 



:3USY 

: INDEX HARK DETECTED 

;DR !S FULL ON READ. EMPTY ON WRITE 

;track zerc 

;LCIST DATA 

:CRC ERROR IN 10 FIELD 



;seek error 
;record not found 



;head loaded 
jhrite fault 



:HRITE PROTECTED 

jcrive not ready 



= 0014 



sdisk timing counts 

D.CEL: =^ 20 



iOELAY after FUNCTION 



SORCIM eOSx Assembler ver 3.;E 



MACRO DEFINITIONS 
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CsSORDMA .ASH 



ENAROn MACRO 



O 
o 





01 






OUT 







LDK 


A«0 




STO 


AtROHRAM 




EI 






ENDH 




OISROH 


MACRO 
01 






OUT 


1 




LDK 


A.l 




STO 


AtROMRAM 




EI 






ENDM 




PUSHAL 


MACRO 






PUSH 


BC 




PUSH 


OE 




PUSH 


HL 




ENDM 




POPALL 


MACRO 






POP 


HL 




POP 


DE 




POP 


BC 




ENDH 





NEM DISK DRIVERS 
QS40 
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C:SORQMA .ASM 

RORV: 

!RESET DRIVE 

; ENTRY 

;kone 



tEXIT 
;CBIT 



SET IF ERROR 



O 
o 



0B40 

0B40 3E0A 

0842 3205EF 

0B45 COA400 

0B48 3804 *0a4E» 

Oe4A CDF70B 

0B40 DO 

084E 3A05EF 

0S51 30 

0B52 FEOl 

0B54 20EC "0842$ 

0B56 3E01 

0B58 B7 

0859 37 

0B5A C9 



PROC 



SLOOP! 



!l: 



UDK 


A.NRETRY 


STO 


A.RTRY 


CALL 


SELDRV 


JRC 


:l 


CALL 


HOME 


RNC 




LD 


AtRTRY 


DEC 


A 


CMP 


1 


JRNZ 


SLOOP 


LDK 


A.l 


OR A 


A 


STC 




RET 





;SELECT DRIVE 



;H0ME DRIVE 
:IF GOOD 



;A = OFFH FOR CBIOS 
MNOICATE ERROR 



SORCIK 808x Assembler ver 3.5E 



NEM DISK DRIVERS 
0B5S 



0B5B 

0858 
085F 
0B62 

0B64 
0B65 



0866 3E01 

0868 3205EF 

0B6B 87 

0B6C C9 
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RSeC: 

;read sector 

!*NDTE* 

; NO retries are performed at this level 

! ENTRY 

:3 



:exit 
;hl 

;ZBIT 
iA 



FD21750C t 
C0B40B 
3802 *0B66$ 

AF 
C9 



:l: 



NUMBER OF SECTORS 



;rtry 

PROC 

LDK 

CALL 

JRC 

XRA 
RET 

LDK 
STO 
OR A 
RET 



LAST DMA ADDRESS PLUS ONE IF GOOD TRANSFER 
RESET IF ERROR 
NONZERO IF ERROR 

1 IF ERRORCSO OLD CBIOS DOESN'T DO RETRYS) 



lY.READ 
R.MSEC 



Atl 

A.RTRY 

A 



:IF ERROR 

: INDICATE GOOD TO CBIOS 



;set retry to 1 for old cbios 
;reset zero flag to indicate error 



NEW DISK DRIVERS 
OB60 
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C:SDRaMA .ASH 
HSEC: 

;hrite a sector 

:«NOTE» 

No retries are performed at this level 



; ENTRY 

;b 

;exit 
:hl 

:ZBiT 

:a 



OB60 

0B50 FDZ17D0C $ 

0B71 C0B40B 

0B7* 3802 *0a78» 

0B76 AF 

0B77 C9 

0373 3EQ1 :l: 

0B7A 3205EF 

0870 B7 

0B7E C9 

087F C9 



;rtry 

PROC 

LOK 

CALL 

JRC 

XRA 

RET 

LDK 
STO 
OR A 
RET 
RET 



NUMBER OF SECTORS 



LAST DMA ADDRESS PLUS ONE IF GOOD TRANSFER 
RESET IF ERROR 
NONZERO IF ERROR 

1 IF ERRORISO OLD CBIOS DOESN'T DO RETRYS) 



lY, WRITE 

R_«$EC 

'1 :iF ERROR 

A ! INDICATE GOOD TO CBIOS 



A<1 

A,RTRY 
A 



;SET RETRY TO 1 FOR OLD CBIOS 
JRESET ZERO FLAG TO INDICATE ERROR 



o 
o 



HEU DISK DRIVERS 
OB80 
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c:sorqma .asm 

SENDEN: 

iREAO THE AOORESS AND SET CHECK FOR SINGLE DENSITY 

; ENTRY 

;none 



EXIT 
A 
B 
ZBIT 



NONZERO IF ERROR 
NUHBER CF SECTORS ON ONE TRACK 
RESET IF ERROR 
;SAVTYP IS SET WITH DENSITY AND SECTOR SIZE 



0B80 



0B80 3E02 
0B8Z 3205EF 



PROC 
*CHECK DENSITY 

SDENSITY tOCPtCHECK PRESENT DENSITY FIRST) 

;H0HE DRIVE JUST ONCE 



0B85 0605 

0B87 C5 

0B88 CDA40D 

0BS8 CDECOC 

0B3E CI 

0B8F 3004 »0B95$ 

0B91 10F4 »0B87$ 

0893 1812 *08A7$ 



0895 3A0CEF 

0B98 E603 

0B9A FEOl 

0B9C 2009 *0BA7$ 

0B9E 3E05 

OBAO 32D0EF 

0BA3 060A 

0BA5 AF 

0BA6 C9 



0BA7 C0F70a 

OBAA 3A05EF 

OBAO 30 

OBAE Z0D2 *0B82i 

OBBO 3E01 

0BB2 87 

0BB3 C9 



sRl.1: 



:RL2s 



LOK 
STO 



A<2 
A.RTRY 



;retry loop before and after home 



LDK 

PUSH 

CALL 

JRC 

CALL 

POP 

JRNC 

DJNZ 



JR 
*SET "SAVTYP" 

:l: LO 

AN I 
CPI 

JRNZ 

LDK 
STO 

LDK 
XRA 
RET 



B,NRETRY/2 

BC 
SELORV 

RAOR 
BC 
:l 
:RL2 

:ERR1 



A»DSTSa+3 
0000_0011B 
00OO_00013 
SERRI 

Af oooo.oioia 

A. SAVTYP 

B»10 
A 



:HALF BEFORE HOME AND HALF AFTER 
;SAVE RETRY COUNT 

• cci FTT DRIVE 

•NO ERROR CHECKING FOR SELORV BECAUSE NO ERRORS ARE RETURNED AT THIS TIME 
;REA0 ADDRESS 

;restore retry 

:IF GOOD 

SRETRY IN THIS DENSITY 

;IF ERROR HOME DRIVE AND TRY AGAIN 



5SECT0R LENTH STATUS BYTE 

;o-3 

;CHECK FOR 256 



SSINGLE DENSITY 256 



;SET FOR SINGLE DENSITY 
;RESET FLAGS 
;GOOD RETURN 



4IF DENSITY ERROR CHANGE DENSITY AND RETRY TO sRLl! 
s ERR 1 ! 



CALL 
LD 
DEC 
JRNZ 

LDK 
OR 4 
RET 



HOME 
A.RTRY 
A 
:RL1 

A.l 
A 



shome drive 

;retry loop 



5flags to nonzero 
;error return 



NEW DISK DRIVERS 
08B4 
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C:SDROM& .ASH 

R_HSEC: 

SREAD OR WRITE SEGMENT 

SENTRY 



;b 

;IY 

;exit 
:hl 

;CBIT 



NUMBER OF SECTORS TO READ OR WRITE 
"READ" AODR OR "WRITE" AODR 



LAST DMA ADDRESS PLUS ONE IF GQDO TRANSFER 
SET IF ERROR 



0BB4 



PR DC 



0SB4 3E0A 
0BB6 3205EF 



0BB9 C5 



LDK 

STO 



:RL00P: push 



AtNRETRY 
A.RTRY 



BC 



OBBA C5 
OBBB FOES 



PUSH 
PUSH 



BC 
lY 



OBBO COA400 
08C0 2805 »0BC7» 



CALL 
JRZ 



SELDRV 



;SET "D.TRKR" TO HEAD POSITION 



-.TURN DRIVE ON 

!IF DRIVE WAS SELECTED DON'T READ ADDRESS 



OBCZ 


C0300B 


0BC5 


2022 *0BE9S 


0BC7 


CDIAOC 


OBCA 


3810 *08E9$ 


OBCC 


ODEl $ 


OBCE 


CI 


OBCF 


21D50B 


08D2 


E5 


0303 


00E9 S 


0B05 


CI 


0BD6 


DO 


0BD7 


2105EF 


OBOA 


35 


0B03 


2811 *D3EES 


OBDD 


7E 


OBDE 


FE09 


OBEO 


2007 *0SB9S 


0BE2 


CDBOOa 


08E5 


2007 "OBEES 


08E7 


1800 "0839$ 


03E9 


FDEl I 


OSES 


CI 


OBEC 


CI 


OBEO 


C9 



:l! 



:RTRYl: 



:ERRli 



CALL 


SENOEN 


JRNZ 


:ERR1 


CALL 


SEEK 


JRC 


:ERR1 


POP 


IX 


POP 


BC 


LDK 


HL,:RTRY1 


PUSH 


HL 


JMP 


CIXI 


POP 


BC 


RNC 




LDK 


HL.RTRY 


DEC 


tHL3 


JRZ 


:FIN 


LO 


a.chl: 


cxp 


NRETRY-1 


JRNZ 


:RLOOP 


CALL 


SENDEN 


JRNZ 


:FIN 



JR 



POP 
POP 



POP 
RET 



SRLODP 



lY 

8C 



!READ ADDRESS AND SET CONTROLLER 
:STOP 

SSEEK TG TRACK 
:STCP 

;AD0RESS TO CALL IN IX 
;NUM3ER of SECTORS TO R/W 

;for returm 

;call and return to :2 

;REST0R£ NU."IS£R of SECTORS TO READ 
;RETURN IF GOOD 



:no more retrys 
;get Nut<BE* of retry 
:lqcp 

:CHECK TRACK on the SECOND RETRY 
5STCP IF ERROR 



ilF ERROR 3EF0RE READ OR WRITE 



ec 



03EE 37 



:FIN: 



STC 



SORCIH 308x Assembler ver 3.5E <zl55/7= 59:92 Page 100 
NEW DISK DRIVERS C:SDRQMA .ASM 

OBEF C9 RET 



O 
o 



MEM DISK DRIVERS 
08F0 
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SCTRKR: 

:set contrdler track regester 
sd.trkr <= savtrk 

;useo in formating hhen you don't kndh where the head is 
;entry 



CO 

o 






;SAVTRK 


— 


TRACK 


3 
O 






:exit 

;d.trkr 


s 


SAVTRK 


-a 
c 

o 
o 


08F0 
OBFO 
03F3 
08F6 


3A15EF 
320121 
C9 




PROC 
LD 
STD 
RET 


A, SAVTRK 
A.O.TRKR 



o 
o 

3 



NEW d:sk drivers 

0BF7 



OBF? 




0BF7 


3A13EF 


OBFA 


E607 


OBFC 


3213EF 


06FF 


3E00 


OCOl 


CD7600 


OCO* 


D8 
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C:SDROMA .ASM 

HOME: 

:home disk drive 

;orive is already selected and ready 

;lf "SEKDEL" has ths verify bit set this proc will check for seek and crc errors 
; ENTRY 



;SEEK DELAY 

;SPEAD t VERIFY BITS ONLY 



0C05 3A0021 
OCOB CB57 t 
OCOA 280C »0CIB$ 



OCOC 
QCOF 
OCll 

0C12 
0C15 
0C17 



3A13EF 

E604 

C8 

3A0021 

£618 

C8 



0C18 37 
0C19 C9 



;SDISK 


= 


DRIVE 


;exit 

;CBIT 


s 


SET IF ERROR 




PROC 
LD 
ANI 
STO 


A.SEKDEL 

OOOO.QUIB 

A.SEKDEL 




LOK 

CALL 

RC 


A.D.RES 
PSEKC 




LD 

BIT 

JRZ 


A.O.STSR 
2. A 
:l 




LD 

ANI 

RZ 


A.SEKDEL 
O0O0_010OB 




LD 

ANI 

RZ 


A.O.STSR 
OOOl.lOOOB 


:l! 


STC 

RET 





;PERFORH HOME COMMAND 
;IF ERROR 



:IF NOT ON TRACK ZERO 



SVERIFY? 

;N0 verify GOOD RETURN 



;TEST SEEK AND CRC 
5G00D RETURN 

:IF ERROR 



NEW DISK DRIVERS 
OCIA 
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C:SOROMA .ASM 

SEEKS 

;SEEK TO TRACK DEFINED BY S4VTRK 

iTRACK REG UPDATED AND VERIFIED 

SENTRY 

:SAVTRK SET TO DESIRED TRACK 



o 

CD 

o 






SEXIT 
;CBIT 

• 


IF NO 


SET IF ERROR 
ERROR CONTROLER 


TRACK = SAVTRK 


9 

•5 
o 

ni 


OCIA 
OCIA 
OCID 
0C20 
0C21 


210121 

3A15EF 

BE 
C3 




PR DC 

LOK 

LD 

CMP 
R2 


HL.D.TRKR 

A.SAVTRK 

tHLl 


SRETURN 


2. 
o' 

3 


0C22 
OC25 
0C27 
0C2A 


320321 

3E10 

C07600 

08 




STO 
LDK 
CALL 
RC 


AtD.DATR 

A.O.SEK 

PSEKC 


;SET TRACK WANTED 

SPERFORM SEEK COMMAND 
;IF ERROR 




0C2e 
0C2E 
0C30 


3A13EF 

E604 

CS 




LD 

AN I 
RZ 


AfSEKDEL 
0000,01008 


:VERIFY? 

;N0 VERIFY GOOD RETURN 




0C31 
0C34 
0C36 


3A0021 

E618 

C8 




LD 

ANI 

RZ 


A.D.STSR 
OOOl.lOOOB 


;T£ST seek AND CRC 

;gooo return 




0C37 
0C38 


37 

C9 




STC 
RET 




5 IF ERROR 



NEW DISK DRIVERS 
0C39 
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C:SDRDMA .ASM 

step: 

:STeP ONE TilACK 

;SAVTRK IS NOT USED IN THIS PROC 

;CONTROLER TRK REG IS UPDATED 

;VERIFY IS PERFORMED 

SENTRY 

;none 



a 

3 






c 

ST 






o 


0C39 




9 


0C39 


3E20 


■3 


0C3B 


C076D0 


o 
S 


0C3E 


08 


3 






0C3F 


3A13EF 




OC*Z 


E604 




00*4 


C8 




0C45 


3A00Z1 




0C48 


E618 




0C4A 


C8 




0C4B 


37 




0C4C 


C9 



EXIT 
CBIT 


IF NO 
PROC 


SET IF ERROR 
ERROR CONTROLER 


TRACK = TRACK */- 1 




LDK 

CALL 

RC 


A.O.STP 
PSEKC 


SPERFORM STEP CCHMAND 
;1F ERROR 




LD 
AN I 
RZ 


A.SEHDEL 
0000_9100B 


;VERIFY? 

:nq verify good return 




LD 

ANI 

ftZ 


A.O.STSR 

oooi.ioooa 


;TEST seek AND CRC 

;gooo return 




STC 




;iF error 




RET 







NEW DISK DRIVERS 



0C4D 



SORCIH B03X Assembler ver 3.5E 



STEPIN: 

:STeP IN ONE TRACK 

;SAVTRK IS NOT USED IN THIS PROC 

;CONTRQLER URK REG IS UPDATED 

: ENTRY 

:nqne 
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0C4D 

OC*D 3E*0 

0C4F CD760D 

OC52 08 

0C53 3A13EF 

0C56 E604 

0C58 C8 

0C59 3A00Z1 

0C5C E618 

0C5E C8 

0C5F 37 

0C60 C9 



;exit 








:CBIT 


= 


SET IF ERROR 




i 


IF NO 
PROC 


ERROR CONTROLER 


TRACK = TRACK + 1 




LDK 


A.D.STPI 






CALL 


PSEKC 


;PERFORM STEP-IN COMMAND 




RC 




:IF ERROR 




LD 


A.SEKDEL 






AN I 


oooo_oiooe 


;VERIFY? 




RZ 




;no verify good return 




LD 


A.D.STSR 






AN I 


oooi_ioooe 


STEST SEEK AND CRC 




RZ 




;GOOO RETURN 




STC 




!IF ERROR 




RET 







o 

o 



NEW DISK DRIVERS 
0C61 



SORCIM 808x Assembler ver 3.5E <:/55/7= 



STEPOUT: 

;STEP OUT ONE TRACK 

;SAVTRK IS NOT USED IN THIS PRQC 

5C0NTR0LER TRK REG IS UPDATED 

;VERIFy IS PERFORMED 

; ENTRY 

:none 
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o 






;exit 








o 

3 

I 






;CBIT 


= 


SET IF ERROR 








: 


IF NO 


ERROR CONTROLER 


TRACK = TRACK - 1 


9 


0C61 






PR DC 






0C61 


3E60 




LDK 


A.D.STPO 




i 


0C63 


C0760D 




CALL 


PSEKC 


! PERFORM STEP-OUT COMMAND 


S 


DC 66 


D8 




RC 




;IF ERROR 


§ 


0C67 


3A13EF 




LO 


AiSEKDEL 






0C6A 


E604 




AN I 


0000_0100B 


■.VERIFY? 




0C6C 


C8 




RZ 




;N0 VERIFY GOOO RETURN 




0C6D 


3A00Z1 




LO 


AiD.STSR 






DC 70 


E618 




AN I 


OOOl.lOOOB 


JTEST SEEK AND CRC 




0C72 


C8 




RZ 




;GOOO RETURN 




0C73 


37 




STC 




:IF ERROR 




OCT* 


C9 




RET 







NEW DISK DRIVERS 
0C75 



0C75 
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rsSDROMA .ASM 



READ: 
; ENTRY 

;8 
;exit 

SHL 
;CBIT 



NUM8 OF SECTORS TO READ 



LAST DMA ADDRESS PLUS ONE IF GOOD TRANSFER 
SET IF ERROR 



PR DC 



0C75 3E80 
0C77 3 2niEF 



0C7A C3820C 



LDK 
STO 


A.D.ROS 
AtRDT_WRTS 


JMP 


RD.WRT 



;jMP AND RETURN TO CALLING PROC 



o 

o 



NEa DISK DRIVERS 



0C7D 
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CsSDROHA .ASM 



WRITE: 
SENTRY 



NUMB OF SECTORS TO WRITE 



;exit 
;hl 

SCBIT 



LAST DMA ADDRESS PLUS ONE IF GOOD TRANSFER 
SET IF ERROR 



O 
o 

3 



0C70 



0C7D 3EA0 
0C7F 32D1EF 



PROC 



LOK 
STO 



JMP 



A.D.WRTS 
AtROT_WRTS 



RD.WRT 



;FALLS THROUGH TO RD_WRT 



o 

o 



NEW DISK DRIVERS 
0C82 
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C:SOROMA .ASM 



RO.HRT: 

*P.EAD QR WRITE 

:entry 



= NUMB OF SECTORS TO READ OR WRITE 

:R0T_HSTS = O.ROS or d.wrts 



o 
o 

3 



0C32 



0C82 3A14EF 
0C85 320221 



jexit 








;hl 


= 




LAST DMA 


;cbit 


- 
PR DC 




SET IF E 


SSET sector 


REG 






LO 




A.SAVSEC 




std 




A.D.SECR 



LAST DMA ADDRESS PLUS ONE IF GQCD TRANSFER 



;SET Dt TO NUM3ER OF SYTES IN ONE SECTOR 



0C38 


C5 






PUSH 


3C 


0C89 


213000 




LDK 


HL,123 


0C8C 


3A00EF 




LD 


A.SAVTYP 


0C8F 


CB3F 




i 


SRL 


A 


0C91 


C63F 




t 


SSL 


A 


0C93 


E603 






ANI 


0000_00118 


0C95 


87 






ORA 


A 


0C96 


2304 


*0C9C1 


JRZ 


:2 


0C98 


47 






MOV 


B<A 


0C99 


29 




IBLOOP: 


ADD 


HL.HL 


0C9A 


lOFD 


"0099$ 


DJNZ 


IBLOOP 


0C9C 


EB 




:25 


EX 


OE.HL 


OC90 


01 






POP 


BC 


0C9E 


C5 






PUSH 


EC 



;SAVE NUMBER OF SECTORS TO READ OR WRITE 



;oisk type 
:dump two bits 

;size only 

;SrT FLAGS 
;IF 128 



:SHIFT LEFT ONE BIT 



:de=hl 



?RESTORE NUMBER OF SECTORS TO READ OR WRITE 
;SAVS NUMBER OF SECTORS TO READ OR WRITE 



:GET CDHHAN3 AND CHECK FOR MULTI-SECTOR 



0C9F 


78 


MOV 


A. 8 


OCAO 


OEOO 


LOK 


CO 


0CA2 


FE02 


CMP 


2 


0CA4 


3802 •0CA8i 


JRC 


:l 


0CA6 


OEIO 


LOK 


CtlOH 


0CA8 


3A01EF :l: 


LO 


A.RDT.WRTS 


OCAB 


Bl 


OR 


C 



;get nlimjer of sectors 
:mak£ ^0N^'ULTI-S£CTOR 

;IF LESS THAN TWO SECTORS 
;M4K£ MULTI-SECTOR 

:GET O.SDS or D.WRTS 

;MAKE MULTI-SECTOR OR NONMULTI-SECTOR 



iset hl tc number of bytes to transfer 



OCAC 


210000 




LOK 


HL,0 


OCAF 


19 


:L0CP: 


ADD 


HL.DE 


CC80 


lOFO *OCAFS 




CJNZ 


JLOOP 


0C82 


E5 




PUSH 


HL 



:SAVE LENTH 



;GIVE COMMAND 



0C93 

0CB4 CC84C0 



01 
CALL 



FOS< 



o 
o 



NEH DISK DRIVERS 

0C87 CI 

0CB8 3003 *OCBDt 

OCBA DI 
OCBB 
OCBC C9 
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POP 
JRNC 

POP 

El 

RET 



BC 

:7 



DE 



:00 DMA 



OCBD ZAOFEF 



OCCO IIOIOC 

0CC3 D5 

0CC4 3AD1EF 

0CC7 FE80 

0CC9 2003 *OCCEt 

OCCB C30A0E 

OCCE C3200E 



:7: 


LD 


HLiOMAOR 




LDK 


DE<:6 




PUSH 


DE 




LD 


A.RDT.HRTS 




CHP 


O.ROS 




JRNZ 


:5 




JHP 


DHARD 


:5: 


JMP 


OHAMRT 


SCHECK 


FOR BUSY 


AND RESET 


:6: 


LD 


A.COE] 



OCDl 


lA 


:6: 


LD 


A.COEl 


0C02 


CB47 * 




BIT 


OiA 


0CD4 


CI 




POP 


BC 


0CD5 


280E *0CE5i 




JRZ 


SA 


DC 07 


05 




DEC 


B 


0C08 


2005 »OCDFS 




JRNZ 


:Al 


OCOA 


COE600 




CALL 


WBUSY 


OCOO 


1803 •»0CE2t 




JR 


:A2 


OCOF 


CD640D 


:Al: 


CALL 


FORINT 


0CE2 


3A0021 


SA2: 


LD 


A.O.STSR 






:CH£CK 


FOR ERRORS 


oces 


E65C 


S4J 


AN I 


OlOl.llOOB 


0CE7 


2801 *0CEA» 


*NOTE* 


JRZ 


S3 



:restor£ lenth 

;IF GOOD 
:ReSTQRE STACK 
;ERR0R RETURN 

:HL = DMA ADDRESS 

;FDR RETURN 

;GET COMMAND 

;IF WRITE 

;READ DMA RETURNS TO :6 
;HRITE DMA RETURNS TO :6 



;GET STATUS 

:REST0R£ NUMBER OF SECTORS 

;IF NOT BUSY 

:SUBTRACK ONE FROM THE NUMBER OF SECTORS AND SET THE ZERO FLAG 

;IF MORE THAN ONE. FORCE INTERUPT 



ilF NON MULTI-SECTOR R/H WAIT FOR BUSY TO DROP 



:CLEAR BUSY 
SGET STATUS 



;TEST write protect. rnf« crct and lost data 
;IF GOOD 



If this was a mult-sector function their will not be a Record Not Found error, as the manual 
;states. because we left the chip before it got to the naxt sector to find it wasn't there. 



0CE9 37 



OCEA 
OCEB C9 



S3: 



STC 



EI 
RET 



;IF ERROR RECORD CONTROLER REGESTERS 



;return 



NEW DISK DRIVERS 
OCEC 
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RAORs 



;REA0S six BYTES INTO "OSTSB" 

;ENTRy 
;none 



o 
o 



;exit 
:a 

;C8IT 

:O.TRKR 

*NOT£* 



0CF4 010600 
0CF7 2109EF 



OCFA 


llOBll 


OCFD 


3A0021 


ODOO 


IF 


0001 


IF 


0002 


DA 1200 


0D05 


IB 


0006 


7A 


OD07 


83 


0008 


C2FD0C 



OFFH IF TINE OUT ERROR 
SET IF ERROR 
HEAD POSITION 

SETS TRACK REG IN CONTROLER IF GOOD 



OCEC 

OCEC 3EC0 

OCEE 

OCEF C0840O 

0CF2 3330 •0031$ 



PROC 

LOK 

01 

CALL 

JRC 



AtD.ROA 



FOSK 
:l 



•function disk 



:WAIT FOR FIRST ORQ OR TIME OUT 

;SET REGESTERS FOR DMA TRANSFER 



SLOOP: 



LOK 
LOK 



BC<6 
HL, OSTSB 



5SIX BYTES TO READ 
SF8A FOR DMA 



;WAIT FOR 1/4 OF A TRACK(60MSS OR ORQ 



LDK 


0E.4363 






LD 


A.D-STSR 


;(i3> 


GET STATUS 


RAR 




:i4) 




RAR 




;(4) 




JC 


:3 


MIO) 


GOT ORQ 


DEC 


0£ 


;{6i 




MOV 


A.D 


;(4) 




CRA 


E 


H'ti 




JNZ 


:L0QP 


;(io) 





ODOB 


CD6400 


CALL 


FORINT 


ODOE 


3EFF 


LOK 


A. OFFH 


DDIO 


181E *0030$ 


JR 


:2 



0012 3A0321 

0D15 77 

0D16 23 

0017 OB 

0018 CDOAOE 



23: 



sindicate time cut error 

:clear busy 

;a=offh 

sindicate a time out error 

;TRANSFER FIRST BYTE AND CALL OHARO FOR LAST FIVE BYTES 



LD 


At D.OATR 


;tl3) GET BYTE 


STO 


A,tHL3 


;t7) ST3RE 3YTE 


INC 


HL 


;(6) 


DEC 


6C 


;<6) 


CALL 


OMARD 


niTt CALL DMARO 



;RETURN FROM OMARD AND WAIT FOR BUSY T3 BE RESET 



ODIE CDE600 
ODlE 3811 -•0031S 



0D20 3A0021 



CALL 


W8USY 




JRC 


:l 


;IF TIME OUT ERRDR 


LD 


A.D.STSR 


JGET STATUS 



o 

o 



NEW DISK DRIVERS 
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:CHECK FQR ERRORS 





: 


AN I 


0001.10008 


0023 


E61C 


AN I 


0001 llOOB 


0D25 


2009 »0D30t 


JRNZ 


:2 




:SET 


TRACK REGESTER 


0D27 


3A0221 


LD 


A.D.SECR 


002A 


320121 


STO 


A.D.TRKR 


0D2D 


AF 


XRA 


A 


002E 


IBOl *0D31$ 


JR 


!l 


0030 


37 :2! 


SIC 




0D31 
0032 


:l; 

C9 


EI 
RET 





STEST RNF AND CRC 

;TEST RNF, CRC AND DATA LOST 

:IF ERROR 



;get track 
;set track 
;reset carry 



iSET CBIT 



NEW DISK DRIVERS 
0D33 
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READTRKs 

;read one track froh the drive 

; ENTRY 



: on ADR 



JEXIT 
;CBIT 



0D33 

0D33 3EE0 

0035 

0036 C0340D 

0039 3aOC *0D47$ 



003B 


OlFFFF 


003E 


2A0FEF 


0041 


CDOAOE 


00 44 




0D45 


AF 


0046 


C9 


0D47 




0D43 


C9 



PROC 

LDK 

01 

CALL 

JRC 



:do dha 



:l: 



LDK 

LD 

CALL 

£1 

XRA 

RET 

EI 
RET 



FHA OF BUFFER 
SET IF ERROR 

AiO.RDT 

FDSK 
:l 



BCOFFFFH 

HL.DMAOR 

DMARO 



;IF ERROR 



;F0R RDM 1.2 
SIN ROM 



SORCIH aOBx Assembler ver 



O 

o 



3 
-o 



NEW DISK DRCV6RS 












QD*9 




FMTTRKJ 

;format 

: ENTRY 


one track 

SOHADR = FHA 


OF 


SUFFER 


0049 
0D49 
004B 
0D4C 
0D4F 


3EF0 

008400 
3810 *006lt 


;exit 

:C8IT 

!D0 CHA 


PROC 

LOK 

DI 

CALL 

JRC 


SET IF ERROR 

A.D.WRTT 

FDSK 
:l 




!IF ERROR 


0051 
0054 
0057 


OlFFFF 
2A0FEF 
C0200E 




LOK 

LD 

CALL 


BCOFFFFH ■ 

HLtOMAOR 

DMAHRT 




;aEFEAT C 
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:CHECK FOR ERROR 



0D5A 


3A0021 






LO 


A.D.STSR 


0050 


E644 






ANI 


0100 OlOOB 


0D5F 


2801 * 


0062 1 




JRZ 


:2 


0061 


37 




:ls 


STC 




0D62 






:2: 


EI 




0063 


C9 






RET 





:GET STATUS 

:TEST write protect, and data lost 

;iF GOOD 



o 

o 

3 



o 
o 
■3 



NEM DISK DRIVERS 
0D64 



0064 

0D6* F5 

0065 C5 

0066 3 EDO 
0058 320021 
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FOR I NT: 

INTERRUPT DISK CONTROLLER 



:none 




;exit 




:BUSY CLEARED. 




PR DC 




PUSH 


AF 


PUSH 


BC 


LDK 


AtD.FINT 


STO 


A.D.CMDR 



;MAIT for at least 28 MICROSECONDS 



0068 


87 


OR A 


A 


0C6C 


0607 


LDK 


B.7 


006E 


lOFE *0D6E$ 


:WL0CP: OJNZ 


:WLO0P 



;<4) 
:(7) 

St91» = (13*7) wait 



0070 CDE60D 



:CHECK FOR BUSY DROP 
CALL WBUSY 



0D73 CI 

0074 Fl 

0075 C9 



POP 


BC 


POP 


AF 


ret 





NEW DISK DRIVERS 
0D76 
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PSEKC: 

;0R IN SEKOEL AND PERFORM SEEK TYPE CDMHAND 

SENTRY 

:A = SEEK TYPE COMMAND 



;exit 

;cbit = set if error 

jcommand sent to controler if no error 



O 
o 



0D76 




0D76 


1,7 


0077 


3A13EF 


007* 


E617 


0D7C 


ao 


0070 


C0340D 


ooao 


08 


0081 


C3E60D 



PROC 




MOV 


B«A 


LD 


A»SEKDEL 


AN I 


0001_0111B 


OR A 


B 


CALL 


FDSK 


RC 




JMP 


WBUSY 



;s = A 

SQNLY UPDATE, VERIFY, £ SPEAD 
JOR IN COMMAND 
;FUNCTI0N DISK 
;IF ERROR 



NEW DISK DRIVERS 
0084 
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FOSK: 

:function DISK routine 

iTHiS IS THE OnLt ROUTINE THAT WRITES TO THE COMMAND REGtSTER OF THE CONTROLER CHIP 

STHIS ROUTTNE HAS A 8UILT IN DELAY OF AT LEAST 28 MICRO SEC. BEFORE READING THE STATUS ON THE CHIP 

; ENTRY 

:A = FUNCTION CODE 









;txiT 












:a 


= 


OFFH IS T 








;CBIT 


- 


SET IF ERi 


0D84 








PROC 




0084 


210021 






LDK 


HL.O.STSR 


0087 


CB46 


t 




BIT 


O.CHLl 


0089 


2803 -i 


308E$ 




JRZ 


:l 


0D8B 


CD640D 






CALL 


FOR INT 


0D8E 


77 




:l: 


STC 


A.CHLl 



:status and cohmand regester 

;if not busy 

jreset busy 

:functicn drivejwrite command to controler) 



iWAIT for at least 28 MICROSECONDS 



0D8F 
0090 
0092 



B7 

0607 

lOFE 



OR A 


A 


LOK 


B,7 


OJNZ 


:WL0OP 



'0092$ :WLOCP: 

SWAIT FDR BUSY TO BE SET 



:(4) 
;{7) 
;{9i» 



(13*7) WAIT 



0094 3eFF 

0C96 47 

0097 C846 S :L00P: 
0099 2004 *0D9F$ 

0098 lOFA *0097$ 



0090 
0D9E 



37 
C9 



0D9F 326AEF 
00A2 AF 
0DA3 C9 



LOK 


A, OFFH 


MOV 


8, A 


BIT 


BS.BSY.tHLI 


JRNZ 


53 


DJNZ 


ILOCP 


STC 




RET 




STO 


AtOACTVE 


XRA 


A 


RET 





:(7) 

;(41 256 LOOPS 

;8S.8SY 

:IF CHIP WENT BUSY 

;IF NOT TIME-OUT 

;IF ERROR A=FF AND CBIT = SET 



;SET CRIve ACTIVE COUNTER 
SRESET CAE(RY FLAG 



NEW DISK DRIVERS 
0OA4 
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SELDRV: 
:SELECT DRIVE 
; ENTRY 

;soisK = 



DRIVE TO SELECT 



;exit 

:ZBIT 
:2BIT 
SCBIT 



SET IF PIABD WAS THE SAME AS SDISK 
RESET IF PIABD HAS DIFFERENT THAN SOISK 
SET IF THERE ARE NO INDEX PULSES 



0DA4 




00A4 


C0D400 


0DA7 


3A17EF 


OOAA 


21C7EF 


ODAO 


AE 


QDAE 


E601 


OOBO 


FEOl 


0DB2 


2002 *00B6t 


00B4 


3E40 


0066 


C6«0 


0DB8 


*F 


0089 


3A62EF 


ODBC 


47 


OOBO 


E6C0 


OOBF 


B9 


OOCO 


280B *0OCO$ 


00C2 


COFFOO 


OOCS 


3EFA 


0DC7 


CD2D09 


ODCA 


3E01 


OOCC 


B7 


OOCO 


216AEF 


OOOO 


36FF 


0002 




0003 


C9 



PROC 
CALL 

LO 

LDK 

XOR 

ANt) 

CMP 

JRNZ 

LDK 

:l: ADI 

NOV 

LO 

HOV 

AN I 

CMP 

JRZ 

;SELECT DRIVE 

CALL 
LDK 
CALL 
; LDK 
; CALL 

LOK 

OR A 



:2s 



LDK 
STO 
EI 
RET 



SELDEN 

A. SDISK 

HLtDSKSWP 

tHLJ 

1 

1 

:l 

A<40H 

40H 

Cf A 

A. PIABD 

B.A 

IIOO.OOOOB 

C 

:2 



RDSKD 
A»250 
DELAY 
A. 250 
DELAY 

A.l 
A 

HL.OACTVE 
OFFHttHLI 



SSELECT DENSITY 



;disk drive swap cell 
:swap a for 8 if oskswp^l 
;can only be dr 1 

:if not drive 1 



;GET DRIVE BITS ONLY 

:IF DRIVE ALREADY SELECTED 

:TURN DRIVE ON 

5WAIT FOR MOTOR SPIN UP 

:ZND DELAY 

: INDICATED DRIVE WAS NOT SELECTED 
:SET FLAGS 



3 

T3 



NEW DISK DRIVERS 
00D4 
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0D04 

0DD4 3A61EF 

0007 E6FE 

0009 4F 



ODDA 3AD0EF 

OODD OF 

ODOE 3002 

OOEO CBCl 



SELOEN: 

;SELECT SINGLE OR DOUBLE DENSITY 

; ENTRY 

;SAVTYP = BIT 0: 

! 1 = SINGLE. = DOUBLE 



:£XIT 

;none 

*NOTE 



Bit of "PIAAO" s 



set 
reset 

PROC 
LD 
ANI 
MOV 



single density 
double density 



AtPIAAD 

llll.lllOB 

C.A 



;SET DENSITY BIT 

LD 
RRC 
0DE2* JRNC 

* SBIT 



00E2 
ODES 



C 06409 
C9 



il: 



CALL 

RET 



A.SAVTYP 

si 

OtC 

OPAO 



:PRESENT VALUE OF PIA REG 
;CLEAR BIT 



;GET DISK TYPE INFO 

SCBIT <= BIT 

;IF "SAVTYP" 8IT0 IS 

SSET BIT OF REG C 

; FUNCTION PIA 



o 
o 



NEH DISK DRIVERS 



00E6 
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HBUSY: 

;WAIT FOR SUSY TO CLEAR 

;This routine must wait for 2 seconds 

;2 seconds is the time it takes for the chip to seeK 39 tracKs and have five index holes go by. 

SENTRY 

;none 



o 

o 

3 



00E6 




00E6 


010000 


O0E9 


3A0021 


OCEC 


CB4T t 


ODEE 


280E •OOFE» 


OOFO 


E3 


OOFl 


E3 


0DF2 


23 


0DF3 


23 


0DF4 


2B 


0DF5 


23 


0DF5 


08 


00F7 


78 


OOFS 


Bl 


0DF9 


20Ee »0DE9S 


OOFB 


3EFF 


OOFO 


37 


ODFE 


C9 



-.EXIT 






;a 


= 


OFFH IF ■ 


5CBIT 


PROC 


SET " 




LDK 


BC>0 


SLOOP! 


LO 


A.D.STSR 




SIT 


0,A 




JRZ 


:1 




EX 


tSPl.HL 




EX 


tSPJ.HL 




DEC 


HL 




INC 


HL 




DEC 


HL 




INC 


HL 




DEC 


BC 




HOV 


A,B 




OR 


C 




JRNZ 


ILQCP 




LDK 


A, OFFH 


» 


CALL 
STC 


FQRINT 



;(i3i 






:{S) 


OS.BSY 




;<7) 


GOOD RETURN 


;t23) 


DELAY 




;(23) 


DELAY 




;(6) 


DELAY 




:(6) 


DELAY 




;(6) 


DELAY 




:i6i 


DELAY 




:(6) 






:(4) 






;(4) 






;ii2> 


IF NOT 


TIM 



:tihe out error 

;RESET BUSY 

;set error 



RET 



NEW DISK DRIVERS 
ODFF 
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ROSKD: 

5SELECT DRIVE BY SETING THE "PIA" WITH THE VALUE SPECIFIED BY C 

; ENTRY 



:c 



DRIVE 



O 
o 

3 







:exit 










:NaNE 






ODFF 






PROC 




ODFF 


3A62EF 




LD 


AtPIABO 


OE02 


E63F 




ANI 


OOH.llllB 


0E0« 


Bl 




OR 


C 


0E05 


4F 




MOV 


CtA 


0E06 


CD7109 




CALL 


OPBD 


0E09 


C9 




RET 





;get vio offset and bell 



;functign pio-5 



o 

o 



NEM DISK DRIVERS 
OEOA 



SORCIH 60Sx Assembler ver 3.5E 



OEOA 




OEOA 


H0021 


oeoo 


lA 


OEOE 


IF 


OEOF 


00 


OEIO 


IF 


oeii 


D20D0E 


OEl* 


3A0321 


0E17 


77 


0E18 


23 


0E19 


OB 


OEIA 


78 


OEIB 


81 


OEIC 


C20DDE 


OEIF 


C9 
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DMAROs 

;transfer data from controler to memory 
;entr¥ 



;bc 


s 


BYTES TO TRANSFER 


:hl 


= 


fwa of suffer 




;£XIT 








;hl 


= 


NEXT ADDRESS 




:de 


PROC 


O.STSR 






LDK 


DE.D.STSR 


;(io) 


:L0QP: 


LD 


A,[DE] 


;<71 GET STATUS 




rar 




:(4) 




RNC 




5(51 RETURN IF NO BUSY 




RAR 




;(4) 




JNC 


:L00P 


;(10) IF NO DRQ 




LD 


AtD.DATR 


:tl3) GET BYTE 




STO 


A<CHL] 


:(7) STORE BYTE 




INC 


HL 


:(6) 




DEC 


ac 


:(6) 




MOV 


A.B 


:(4) 




OR A 


C 


;f4i 




JNZ 


ILOGP 


;(10) 




RET 
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0E20 
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0620 




0E20 


110021 


0623 


lA 


0E24 


IF 


0E25 


DO 


0E26 


IF 


0E27 


D2230E 


0E2A 


7E 


0E2B 


320321 


0E2E 


23 


0E2F 


OB 


0E30 


78 


DE31 


Bl 


0E32 


C2230E 


0E35 


C9 



DMAHRT: 

•Xfer data from memory to disk 

;£NTRY 



SBC 

;hl 



;exit 



SLODPS 



PROC 
LDK 

LO 

RAR 

RNC 

RAR 

JNC 

LD 

STO 

INC 

DEC 

MOV 

OR A 

JNZ 

RET 



BYTES TO TRANSFER 
FWA OF BUFFER 



NEXT ADDRESS 



OE.D.STSR 
A. IDE] 



JLOOP 

A.CHLl 

AtD.DATR 

HL 

BC 

AtB 

C 

:L0CP 



;GET STATUS 
5RETURN IF NO BUSY 
;IF NO ORQ 

;get byte 
;store byte 
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8 

2. 
ID 

3 


NEW DISK DRIVERS 








0E36 




DORV! 










: Deselect drive 




o 






JEntry 






s 






:SOISK 


= 


current disk drive 


lo 


0E36 






PROC 




§ 


0E36 


3A62EF 




LD 


A,PIA80 


§■ 


0E39 


E61F 




AND 


l.llllb 


3 


0E3B 


4F 




HOV 


CtA 


9 

n 


0E3C 


C37109 




JMP 


OPBD ;di 



3 



•deselect last drive 



s 



o 
o 



FORMAT 



0E3F 
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«t73 

FuRiiaT s 

; This oroc Mill format the next track in IBM 3740 format consisting of 40 tracks> with each 

•track containing 10 sectors. 

JEntry 

;BC = FHA of buffer 

5BUF+0 = DH length 

;BUF+2 = beginning of data 

5savtrk = the track to be formated 

;exit 
;none 

PROC 
«SET up buffer and "DHAOR" 

;SET DMADR AND GET LBA+1 OF PRESENT BUFFER 



0E3F C5 

0E40 El 

0E41 

0E42 

0E43 

0E44 

0E45 

0E48 



4E 

23 

46 

23 

220FEF 

09 



PUSH 


BC 


POP 


HL 


LO 


CtHLl 


INC 


HL 


LD 


B,{HL1 


INC 


HL 


STO 


HLtDHADR 


ADO 


HLfBC 



:hl = 8C 



;bc 



LENTH OF FORMAT DATA 



?SET DMA 

!HL = HL + BC 



STEST DENSITY AND SET REG D TO 04EH OR OFFH 



0E49 012003 



0E4C 3AD0EF 
0E4F 164E 



0E51 
0E52 
0E54 



OF 

3002 *0E56$ 

15FF 



LDK 

LO 

LDK 

RRC 

JRNC 

LDK 



BCtSOO 

A.SAVTYP 

0.04EH 

A 

SPLOOP 

DtOFFH 



;800 BYTES OF PAD FOR END OF TRACK 



iOOUBLE 



;IF DOUBLE 
;SINGLE 



;PAD REST OF BUFFER 



0E56 72 

0E57 23 

0E58 

0E59 

0E5A 

0E5B 



OB 
78 
Bl 
20F9 *0E56» 



sPLOOPs STO 
INC 
DEC 
HOV 
ORA 
JRNZ 



D.tHL] 

HL 

BC 

A«B 

C 

SPLOOP 



'FUNCTION DRIVE 

;SELECT DRIVE 



OESD C0A40D 
0E60 3827 «0EB9$ 



CALL 
JRC 



SELDRV 
:ERROR 



STEST FOR STEP OR NO-STEP 



0E52 2115EF 

0E6S 3A0121 

0E&3 BE 

0E69 2817 '•0E82$ 



LDK 
LO 
CMP 
JRZ 



HL.SAVTRK 

A.D.TRKR 

CHL] 

il 



JTRACK REG 

:IF SAVTRK AND TRACK REG ARE THE SAME SKIP THE STEP 



FORMAT 
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:STEP IN ONE TRACK 



£ 


0E6a 


3A13EF 


M 


0E6e 


F610 


§ 


0E70 


3213EF 


a- 

Q 

i 


0E73 


CD4D0C 


d 


0E76 


F5 


3 


0E77 


3A13EF 


c 


0E7A 


E603 


-• 


0E7C 


3213EF 


O 
o 


0E7F 


Fl 



LD 


A.SEKOEL 




OR! 


0001.00003 


:UPOATE 


STO 


A.SEKOEL 


:SET UP SEKDEL 



CALL 



STEPIN 



PUSH 


AF 


LD 


A.SEKOEL 


AN I 


0000_00118 


STO 


A.SEKOEL 


POP 


AF 



:save flags 
;qnly spead left 

;RESET SEKDEL 

;r£Store 



0E80 3807 *0E89» 



JRC 



:ERR0R 



SFORMAT TRACK 



0E8Z 


CD*900 


sis 


CALL 


FHTTRK 


0E85 


3802 "OESgt 




JRC 


: ERROR 


0E87 


AF 




XRA 


A 


0E88 


C9 




RET 




0E89 


3EFF 


s ERRORS 


LDK 


A.OFFH 


OESa 


67 




OR A 


A 


0E8C 


C9 




RET 





= 0E8C RLHA = =>-l ;LWA OF ROM RESIDENT CODE 

HSG 'LENGTH OF THIS ROM IS = '.RLHA 
•LENGTH OF THIS ROM IS = 0E8C' 
= 0000 IF RLHA > OFFCH 

.9 ERROR CODE TOO LARGE.. 
ENDIF 



0E80 = OFFD 
OFFD = 0003 



SERNO: 



org 
ds 



Of fdh 
3 
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*CR3 



1000 = EDBO 
= EFDA 



SERFLG 



ORG 



MRAH 
OEFDAh 



ED80 
ED80 



0180 



HSTBUFs 



Host disk xfer buffer and... 

Format track template holding buffer 



OS 



256+128 



= ££80 



• Directory Buffer 
DIRBUF: = HST8UF+256 



EFOO 


= 


0006 




= 


EFOl 




= 


EF02 




= 


EF04 




~ 


EF05 


EF06 


= 


0001 


EF07 


= 


0001 


EF08 


= 


0001 


eF09 


= 


0006 


EFOF 


_ 


0002 


EFll 


= 


0002 



TEM 


OS 


RNDV 


= 


ERCNT 


= 


RTRC 


s 


RTRY 


= 


MPCHR 


DS 


ECHCP 


OS 


ROHRAM 


OS 


DSTSB 


OS 



6 

TEH+1 

RN0V*1 

ERCNT+2 

RTRC+1 

1 

1 

1 

6 



• random number seed 
;DH ERCNT 
Sretry count 

Sprompt character 
i=Of I ist ehco off 
:o= RAMt 1= ROM 
;Oisk status bytes 



! Disk operation temps and control 

DMADR OS 2 ;Address for read/write Disk 

DHAADR DS 2 ;CBIOSt users DHA 



EF13 



0001 



EF14 


= 


0001 


EF15 


= 


0002 


EF17 


= 


0001 




- 


EF14 




= 


EF15 




= 


eF17 


EF18 


= 


0001 


EF19 


= 


000 2 


EFIB 


= 


0001 


EFIC 


= 


0001 


EFID 


- 


0002 


EFIF 


= 


0001 


EF20 


= 


0001 


EF21 


= 


0001 


EF22 


= 


0001 


EF23 


= 


0001 


EF24 


- 


oooc 


EF30 


~ 


0020 


EF50 


_ 


0001 


EF51 


= 


0001 


EF52 


= 


0001 


EF53 


= 


0002 



; Note order of xxxSEC.xxxTRK.xxxOSK must be maintained 

; along with length (l<2tl). 

SEKDEL! DS 1 :Set for seek-restore command in ROM 

;depends on disk type. Siemens = 3h, MPI = Oh 

1 ilast sector requested 

2 ;last track requested 
1 SSelected disk drive tO»l) 

SAVSeC 
SAVTRK 
SDISK 

1 
2 

1 



SAVSEC 


DS 


SAVTRK 


DS 


SCISK 


OS 


ACTSEC 


= 


ACTTRK 


: 


ACTOSK 


= 


SEKSEC 


DS 


SEKTRK 


DS 


SEKDSK 


OS 


HSTSeC 


DS 


HSTTRK 


OS 


HSTDSK 


DS 


TEMSEC 


DS 


RDFLAG 


DS 


ERFLAG 


OS 


WRTYPE 


OS 


ALV: 


DS 


CSV: 


DS 



sused in bios only 
SRead flag 
;Error reporting 
;Hrite operation type 



ALVS 
CSVS 



; BIOS blocking-deblocking flags 

HSTACT: DS 1 :host active flag 

HSTHRT: DS 1 ;Host written flag 

UNACNT: OS 1 :Unalloc rec count 

UNATRK: DS 2 iTrack 
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EF55 = 0001 
EF56 = OOOl 



UNASEC: DS 
LOGS EC: OS 



JSector 
•Logical sector 



O 
o 

3 



O 
o 



EF57 


= 


0002 


EF59 




0001 


EF5A 




0002 


EF5C 




0001 


EF50 




0001 


EF5E 




0001 


EF5F 




0001 


EF60 




0001 



EF61 
EF&2 



0001 
0001 



LOADR OS 
KEYLCK DS 
CURS OS 



• Zero if locked l^eyboard 
•current cursor position 



• Keyboard scan temporaries 

TKEY DS 1 STem holding key 

HKCNT DS 1 ; Deb ounce key 

IKEY DS 1 ;Last valid keystroke 

CKEY OS 1 SLast control key 

ESCH DS 1 :ESC holding flag 

:PIAAD and PIA60 must be kept sequential .PIAAO first 
; dependency in VC_HDME of BMKEY.asm 
PIAAO: DS 1 SHolds last PIA-A data 
PIABD: OS 1 ;Holds last PIA-B data 



: Calendar montht day year 

EF63 = 0003 lOAY DS 3 

= EF64 IMONTH = I0AY*1 

= EF65 lYR = IOAY+2 



EF66 = 



0006 


HOURS 


EF67 


HINS: 


EF68 


SECS: 


EF69 


SEC6! 



Wall clock time cells and disk active 
see UPTIH: in BMKEY.asm 
DS 6 

H0URS*1 
= HOURS+2 
= HOURS+3 



; Used to deselect drive when there is NO activity 

; on drive for n seconds. See FOSK routine 

EF6A DACTVE: = HOURS+4 S=0 by FOSK» Used by UPTIH 

EF6B BELCMT: = HOURS+5 ;*G bell timer cell 



EF6C = 0001 



LLIMIT DS 
; HSG 



1 ;max #columns in a logical line 
•LLIHIT = '.LLIHlT.'h.' 



; Disk drive current positions 
EF6D = 0002 LDSEL: DS 2 ;Last selected drive 

= EF6E LDTRK = LDSEL+l ;Last track used for non-selected drive 



EF6F = 0002 



IESTK: DS 



•save current stk otr 



Interrupt stack 



EF71 


= 0028 




DS 


20*2 


EF99 


= 0000 


ISTK: 


DS 









■ 


Stack 


entry 


EF99 


= 0028 




DS 


20*2 


EFCl 




BIOSTK: 






EFCl 


= 0000 


ROHSTK: 


DS 





EFCl 


= 0001 


ACIAO: 


DS 


1 



llast command byte written to ACIA 
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eFC2 


= 0004 


R179x: 


DS 


4 


EFC6 


= 0001 


KBOLY: 


OS 


1 



EFC7 



0001 



;i79x register save area 
Skeyboard debounce-del ay cell 



since CP/M CANNOT boot off B:. this cell 
to invert ttis names of the 2 drives: 
= 0< all norir,al< A=A:f B=B: 
=1« all inverted* A=B:t B=As 
DSKSWP OS 1 



Z80 Alternate Register Set 



EFC8 






AtlGN 


lOh 




EFDO 




RAGS: 








EFDO 


= 0002 


DESAX: 


DS 


2 


:de 


EFD2 


= 0002 


BCSAX: 


OS 


2 


:bc 


EFD4 


= 0002 


AFSAX: 


DS 


2 


;af 


EFD6 


= 0002 


HLSAX: 


DS 


2 


;hl 


EFD8 


= 0002 


IXSAX: 


DS 


2 


:ix 


EFDA 


= 0002 


lYSAX: 


DS 


2 


;iY 


EFDC 


= 000 2 


IVSAX: 


OS 


2 


;in 



SInterrupt page register 



efde 






EFEO 






EFEO 


= 


0001 


EFEl 


= 


0001 


EFe2 


= 


0001 


EFE3 


= 


0001 


EFE4 


= 


0001 


EFES 


= 


0001 


EFE6 


= 


0001 


EFE7 


= 


0001 


EFES 


= 


0002 


EFEA 


= 


0002 


EFEC 


= 


0002 


EFEE 


= 


0001 



8080 Register Save Area. 
ALIGN lOh 



EFEF 



0001 



REGS: 




ESAVE: 


OS 


DSAVE: 


DS 


CSAVE: 


DS 


BSAVE: 


DS 


FSAVE: 


DS 


ASAVE: 


OS 


LSAVE: 


DS 


HSAVE: 


DS 


PSAVE: 


DS 


SSAVEJ 


DS 


BKPA: 


DS 


BKPC: 


DS 


VRTOFF 


OS 



:E Register save location 

SD Register save location 

;C Register save location 

;B Register save location 

SFLAGS save location 

lA Register save location 

;l Register save location 

;h Register save location 

:PGH counter save location 

;USER STACK oointer save location 

!last brsakpoint address 
tContents of bKp 

:L4ST VERTICAL OFFSET TAKEN FROM COUT 



Interrupt Jums Vector is between EFFSt EFFF, 
Endx MRAH 



no ERRORst 687 Labels. 5EDFh bytes not used. 



Program LWA = EFFOh. 



SORCIH 803x Assembler ver 
SINGLE Density Monitor for Model 1 system. 



3.5E <!/55/7= 59:92 Page 130 

C:SDROMA .ASM 



a. 


s 


3FREQ 


OFAO 












(Q 

3- 


n 


aKEY 


0001 


19# 4 










e 




ACtAD 


EFCl 


87/14 


128*59 








o 




ACISTA 


0B28 


9/ 2 


88/10 


89/12 


90*18 




M 


n 


ACTOSK 


EF17 


127#38 










O 


n 


ACTSEC 


EFl* 


127»36 










o 


n 


ACTTRK 


EF15 


127#37 












n 


AFSAX 


EFD4 


129#16 










o 

T3 


s 


ALIGN 


mac 


129/13 


129/26 










ALLPOP 


mac 


1*46 


3/28 








s 


ALPHItY 


0003 


66/44 










9 




ALPUSH 


mac 


1#37 


3/16 


58/18 






n 


ALV 


EF24 


127#53 










o 

O 


s 


ALVS 


OOOC 


127/53 










1 

5 


n 


ASAVE 


EFE5 


129«32 












BCPH 


0283 


14/51 


15*17 








o 


n 


BCSAX 


EF02 


129*15 










3 


n 
n 
n 


BELCNT 

BIOJP 

BIOSTK 

BKPA 

BKPC 


EF6B 
Q0E7 
EFCl 
EFEC 
EFEE 


5/21 

7/ 2 

128*56 

129*38 

129#39 


23/ 6 

7* 4 


38/ 8 


128*37 






s 


BKS 


0008 


19/10 


27/ 3 












BHON 


0036 


3/ 3 


3*32 


3/49 


4/13 








BHONl 


006A 


3/46 


4* 4 










s 


BRTBIT 


ooao 


31/11 


47/15 


53/13 










BS.BSY 


oooo 


93«27 


93/28 


117/32 










BS.ORQ 


0001 


93i30 


93/31 












BS.SEK 


0004 


93#40 


93/41 












BS.TKO 


0002 


93*34 


93/35 










n 


BSAVE 
CBELL 


EFE3 
0007 


129*30 
19* 7 


27/11 












CBOOT 


0268 


4/ 9 


4/12 


8/ 7 


13*28 






n 


CCP 


0000 


1*34 














CCPADR 


EFD2 


7/ 4 


14/57 


15/16 


92* 6 






s 


CCRA 


2901 


78/25 


78/45 


79/13 








s 


CCRB 


2903 


78/32 


78/54 


81/21 


81/23 


81/26 81/40 81/42 










81/45 


82/20 


82/22 


82/25 


84/19 34/21 84/24 




n 


CDEHL 


0925 


70* 2 












s 


CDISK 
CHKEY 


0004 
0701 


15/15 
60/22 


63* 9 












CI 


037E 


4/ 4 


8/lC 


20*14 








n 


CKEY 


EF5F 


123*13 














CLRLN 


0684 


39/ 2 


44/ 4 


51/ 2 


52*15 


54/44 






COUT 


0410 


8/11 


11/22 


11/24 


27*18 








C0UT2 


044A 


26/24 


29*20 










s 


CPDRA 


2900 


78/28 
84/26 


78/31 
84/43 


79/ 9 
86/12 


80/12 


82/27 83/Z4 83/50 




s 


CPORB 


2902 


78/35 
84/13 


78/38 
36/14 


79/10 
86/18 


80/10 


81/15 82/13 83/15 




s 


CR 


OOOD 


4/ 5 
27/ 6 


10/ 2 
69/ 5 


12/10 


12/20 


12/28 12/38 12/46 




n 


CSAVE 


EFE2 


129*29 












n 


CSV 


EF30 


127*54 












s 


CSVS 


O020 


127/54 












s 


CTLitY 
CTLTB 


0002 
0913 


66/40 
67/57 


69*43 












CURS 


EF5A 


28/38 


42/33 


128* 7 










D.CMOR 


2100 


93*19 


93/21 


93/22 


93/23 


115/13 






D.DATR 


2103 


93*23 


103/17 


111/49 


122/20 


123/20 
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O 
o 

3 



n O.OEL 0014 


93#52 














O.FINT 0000 


93»15 


115/12 












D.RDA Oflrn 


03«1 7 


111 / 1 ^ 












i^ ^s^i^r^ ^^^? ^ ^^ 


- rf— *•_ 


A* Jt V 4.W 












O.RDS 0080 


93»10 


107/11 


110/16 










O.ftOT OOEO 


93#13 


113/10 












O.RES 0000 


93* 5 


102/16 












D.SeCR 2102 


93#22 


109/16 


112/10 










O.SEK 0010 


93# 6 


103/18 












D.STP 0020 


93* 7 


104/14 












D.STPI 0040 


93# 8 


105/13 












D.STPO 0060 


93# 9 


106/14 












O.STSR 2100 


93#20 


102/20 


102/28 


103/26 


104/22 


105/21 


106/22 




110/35 

123/11 

93»21 


111/31 


111/60 


114/22 


117/13 


120/15 


122/12 


D.TRKR 2101 


101/13 


103/12 


112/11 


125/58 






O.MRTS OOAO 


93*11 


108/11 












D.HRTT OOFO 


93*14 


114/ 9 












DACTVe EF6A 


117/39 


118/41 


128*35 










s DBCT 0001 


62/27 














DORV 0E36 


23/22 


123*27 












DELAY 092D 


70*19 


118/34 












n DESAX EFOO 


129*14 














sD 01 mac 


3/12 


3/33 


3/49 


5/11 


21/11 


31/10 


33/37 




47/13 


53/12 


55/11 


56/16 


56/38 


58/15 


109/60 




111/18 


113/12 


114/11 










S DIH8IT 0000 


33/38 














n DIRBUF EESO 


127*12 














s OISOIM mac 


3/ 3 
55/14 


3/13 
56/19 


5/12 

56/41 


31/13 


33/41 


47/17 


53/15 


s DMA 0080 
















n OHAADR EFll 


127*26 














OMAOR EFOF 


14/24 
125/26 


16/17 
127*25 


18/ 4 


18/17 


110/10 


113/18 


114/17 


DMARD OEOA 


8/52 


110/19 


111/53 


113/19 


121*15 






DMAURT 0E20 


8/51 


110/20 


114/18 


122*28 








DNARH 00 8C 


66*11 


67/35 












OOHOME 08A0 


67/38 


68*45 












OOLF 06A7 


40/ 9 


53*39 












D01F2 06AA 


42/16 


54*12 












n DOWN OOSC 


19*38 














n OS.BSY 0001 


93*28 














n OS.CRC 0008 


93*38 














n OS.ORO 0002 


93*32 














OS.HOL 0020 


93*44 


93/45 












OS. I NX 0002 


93*31 


93/32 












n OS.LSO 0004 


93*36 














n OS.NRY 0080 


93*48 














n OS.RNF 0010 


93*42 














DS-SEK 0010 


93*41 


93/42 












OS.TKO 0004 


93*35 


93/35 












n OS.WTF 0020 


93*45 














n DS.WTP 0040 


93*47 














n DSAVE EFEl 


129*28 














DSKSHP EFC7 


4/ 6 


118/15 


129* 8 










DSTSe EF09 


98/37 


111/26 


127*22 










EBOOT 0194 


10* 6 


14/18 


14/34 


16/30 


17/59 


13/23 




ECHOP 6F07 


5/23 


127*20 












EOELC 05D5 


26/18 


46*18 












EEQL 05A0 


26/21 


43*11 












EFADR 0010 


24* 6 


45/ 5 


45/14 











o 

o 

3 
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EFESC 


0008 


24# 7 


28/41 




EFGR 


0001 


24#10 


24/11 




EFHA 


0002 


24# 9 


24/11 




EFHSK 


0007 


24#11 


29/ 5 




EFSCR 


0020 


24« 5 


45/14 




EFUN 


0004 


24* 8 


24/11 


n 


EFX 


0040 


24« 4 




sD 


E! 


mac 


3/ 8 

47/18 

118/44 


3/30 
53/16 




EINSRT 


05EE 


26/17 


47#20 




EMBOOT 


0187 


10* 2 


10/12 


s 


EN AD I H 


mac 


31/11 


33/38 


s 


ENAROH 


mac 


5/11 


94# 2 


s 


ERC 


007F 


69/ 3 


69/ 3 




ERCNT 


EF02 


127#16 


127/17 


n 


ERFLAG 


EF22 


127«50 




n 


ESAVE 


EFEO 


129»27 




s 


ESC 


0018 


12/ 4 

12/18 
12/40 


12/ 8 
12/22 
12/44 




ESCCAD 


05B4 


26/ 7 


44# 7 




ESCCGR 


0617 


26/10 


49*13 




ESCCHA 


061B 


26/12 


49#21 




ESCCUN 


051F 


26/14 


49*24 




ESCEE 


0624 


25/19 


50* 4 




ESCH 


EF60 


5/24 
128#14 


2 8/39 




ESCHTB 


03B4 


25« 3 


29/ 4 




ESCtCK 


05A3 


26/22 


42*46 




ESCRR 


0624 


26/20 


49*31 




ESCSAO 


05BE 


26/ 8 


45*10 




ESCSGR 


0607 


26/ 9 


49* 3 




ESCSHA 


060B 


26/11 


49* 7 




ESCSUN 


060F 


26/13 


49*11 




ESCULK 


05A6 


26/23 


43* 6 




ESCZZ 


054E 


26/16 


49*29 




EXITI 


OOIE 


3«19 


58/25 


s 


FALSE 


0000 






s 


FCB 


005C 








FOSK 


0084 


109/60 


111/18 


n 


1 FILLC 


093F 


72#11 






FILLZ 


0930 


18/53 


71*28 




FMTTRK 


0049 


8/60 


113*26 




FOR INT 


0064 


8/58 


110/34 




FORMAT 


0E3F 


8/29 


125* 3 


n FS*VE 


EFE4 


129#3i 




s 


FWAVM 


FOOD 


38/10 


39/13 




GKEY 


071F 


5/12 


58* 3 


n GKEYX 


0739 


58f24 






GTMASK 


07E5 


63/15 


63/18 


s 


H.FOC 


2100 


93/19 


93/20 


s 


H.IEEE 


2900 






s 


H.KEY 


2200 


65/11 




s 


H.SCTR 


2AO0 


87/11 


87/15 


s 


H.SIO 


ZAOO 






s 


H.SREC 


2A01 


88/17 




s 


H.SSTS 


2A00 


91/14 




s 


H.SXHT 


2A01 


90/16 




s 


H.VIO 


2C00 


3/23 


73/ 4 



29/26 45/ 5 

49/ 4 49/18 

49/ 8 49/21 

35/44 45/ 3 45/12 



49/11 



29/27 



54/17 



64* 3 
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45/14 



49/24 



5/11 6/13 21/17 31/14 33/42 
55/15 55/20 56/42 110/ 6 113/21 



47/14 53/13 55/12 56/17 56/39 
69/ 5 



12/12 12/lZ 
12/26 12/30 
12/49 12/51 



30/15 



12/14 
12/32 
28/47 



35/47 



12/16 12/18 
12/34 12/36 
69/ 3 



45/ 7 



49/15 



113/12 114/11 116/15 116*18 



126/20 

111/43 114*30 117/17 



73/ 6 73/ 8 73/10 74/21 74/25 
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O 
o 







75/16 


75/20 


91/10 








HINT 


0080 


3/39 


4#14 










n HiCCNT 


EF50 


i28«ll 












n HLSAX 


EFD6 


129#17 












HMSCRN 


0058 


66*12 


67/37 










HOME 


0BF7 


8/53 


95/15 


98/51 


101*15 






HOURS 


EF56 


128#28 


128/29 


128/30 


128/31 


128/35 


128/37 


n HSAVE 


EFE7 


129#34 












HSTACT 


EF50 


18/51 


18/52 


127*57 








HST8UF 


E080 


127# 8 


127/12 










n HSTOSK 


EFIF 


127»46 












n HSTSEC 


EFIC 


127i«4 












n HSTTRK 


EFID 


127i*5 












n HSTHRT 


EF51 


127#58 












I DAY 


EF63 


5/33 


128*22 


128/23 


128/24 






lE.CO 


097E 


5/56 


8/34 


78*18 








IE. GTS 


090* 


8/36 


80# 7 










lE.IDM 


0A85 


8/40 


84»10 










lE.ODM 


0A43 


8/39 


83«13 










IE. DIM 


0A20 


8/38 


82#11 










lE.PP 


OAEl 


8/41 


86#10 










lE.SHK 


0A*F 


82/16 


82/29 


83/13 


33*21 






IE. SI 


09CI 


8/35 


79# 7 










lE.TC 


09E0 


8/37 


ai«13 










lESTK 


6F6F 


3/13 


3/28 


58/15 


128*47 






n ILINT 


0007 


3# 9 












n I MONTH 


EF5 + 


128*23 












IMSG 


0186 


3/44 


11#29 










s INT8L 


EFFO 


5/13 


5/15 










S 3RPTCT 


0018 


60/42 












ISTK 


EF99 


3/14 


58/16 


128*52 








n IVSAX 


EFDC 


129#21 












n IXSAX 


EFD8 


129#19 












n lYR 


EF65 


1231i24 












n lYSAX 


EFDA 


129#20 












n KBDLY 


EFC6 


129* 2 












KBORVR 


073C 


58/23 


59*57 










K3SCAN 


0774 


60/ 7 


61» 9 










K8SERV 


07F8 


60/47 


66*14 










s KCOLM 


0007 


60/46 


62/ 5 










KEYLCK 


EF59 


5/34 


20/ 6 


43/ 9 


58/21 


128* 6 




KEYLST 


EFD4 


5/25 


60/12 


61/60 


92* 8 






s KLELEN 


0002 


5/26 


60/52 


62/14 








s KLLEN 


0003 


5/26 


60/13 


61/59 








s KLUSEO 


0007 


60/20 


62/ 4 


62/25 








s KROWM 


0038 


60/46 


62/ 6 










KYCDTB 


08C3 


65/20 


59* 2 










S KYSRVD 


0006 


60/39 


60/40 










n LOADR 


EF57 


128* 5 












LDSEL 


EF6D 


3/43 


128*44 


128/45 








LDTRK 


EF6E 


18/57 


128*45 










n LEFT 


0080 


19#39 












s LF 


OODA 


10/ 2 


12/ 2 


12/ 2 


12/ 2 


12/ 2 


12/10 12/20 






12/28 


12/38 


12/46 


12/46 


12/45 


19/ 9 27/ 7 


LFTARH 


008D 


66« 8 


67/29 










LIST 


OSIC 


8/12 


8/13 


89*13 








LKEY 


EF5E 


5/22 


20/ 9 


21/11 


21/14 


60/15 


66/49 128*12 


LLIMIT 


EF6C 


5/36 


37/24 


42/ 9 


53/15 


54/32 


123*40 


LDGSEC 


EF55 


18/52 


128* 2 










LOOKUP 


047C 


30/20 


31*22 


32/20 
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c. 
o 

3 



n LSAve EFE6 


129#33 














s LVMEH 1000 


39/ 3 














n MCOOWN OOOA 


19# 9 














n MCLEFT 0008 


19#1C 














MCRIGH OOOC 


19*11 


27/ 9 












MCUP 0006 


19# 8 


27/10 












n MINS EF67 


128*25 














MPCHR EF06 


3/17 


6/11 


127#19 










S MRAM ED80 


3/4C 


127/ 3 












n MSECB 0010 


93# 3 














S NMIA 0066 


3/47 














n NORM 038F 


21#18 














i^RETRY OOOA 


92# 3 


95/11 


98/23 


99/13 


99/46 






s NVDL 0018 
















OPAO 096A 


5/45 


34/33 


68/14 


68/53 


73*12 


119/26 




DP8D 0971 


5/51 


23/15 


28/31 


34/18 


38/ 6 


39/10 


54/55 




68/42 


74#27 


121/13 


124/ 9 








OSTR 0197 


3/45 


10#15 


11/27 










PIAAO EF61 


34/29 


68/10 


68/49 


7 4/24 


119/14 


128*18 




PIA3D EF62 


23/12 


28/24 


34/14 


35/23 


36/ 6 


37/31 


38/ 3 




39/ 7 


50/20 


54/22 


54/45 


68/32 


68/55 


75/19 




118/24 


121/ 9 


124/ 6 


128*19 








s PMCHR 003E 


6/lC 














s POPALL mac 


56/15 


56/37 


94#24 










n PSAVE EFE8 


129#35 














PSEKC 0076 


102/17 


103/19 


104/15 


105/14 


106/15 


115*28 




PSTESC 0455 


28/42 


29»29 












s PUSHAL mac 


56/13 


56/35 


94#18 










n R179X EFC2 


128#61 














RADR OCEC 


8/Z2 


98/28 


110#50 










n RAGS 6FO0 


129#13 














n RDFLAG EF21 


127 #49 














RDRQW 07EF 


61/11 


61/15 


62/42 


63/20 


65* 9 


66/28 


66/32 


RDRV 0340 


8/18 


94*29 












ROSKO ODFF 


118/32 


120#34 












RDTWRT EFDl 


92# 5 


107/12 


108/12 


109/47 


110/15 






RDWRT 0C82 


107/14 


108#15 












READ 0C75 


8/2C 


18/25 


96/16 


106«2a 








READER 0BO3 


8/14 


87#n 


88/12 










READTR 0D33 


8/59 


112#19 












n REGS EFEO 


129#26 














n REPD 0020 


22#15 














n REPK 0005 


22#16 














n RIGHT 008B 


19#37 














RKEY 037E 


21# 2 


21/ 9 












RLWA 0E8C 


126*33 


126/35 


126/36 










RNDV EFOl 


127*15 


127/16 












ROMJPl OOOF 


3/26 


6S14 


8/27 










R0HJP2 00E4 


7» 3 


8/28 












ROHRAM EF08 


3/24 


5/11 


127*21 










ROHSTK EFCl 


3/33 


128*57 












S ROWOM 0081 


51/14 














RSEC 0B5B 


8/23 


14/31 


17/56 


95*27 








R7ARH 0088 


66« 9 


67/31 












RTRC EF04 


127#17 


127/13 












RTRY EF05 


95/12 

99/41 


95/18 
127#18 


96/24 


97/24 


98/19 


98/52 


99/11 


RHSEC OBB* 


96/17 


97/17 


98#59 










SAVSEC EF14 


14/29 


16/19 


109/15 


127*32 


127/36 






SAVTRK EF13 


14/27 


17/11 


18/ 8 


18/19 


101/12 


103/13 


125/51 
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127#33 


127/37 












SAVTYP EFDO 


3/38 


16/38 


92# 4 


98/43 


109/23 


119/20 


125/33 


3 SCLrRE 0035 


71/13 














SCREEN 04A4 


33*43 


35/14 












SCTRKR OBFO 


9/ 3 


100# 2 












SDISK EF17 


3/35 


14/13 


14/48 


16/16 


118/14 


127*34 


127/38 


n SEC6 EF69 


128#31 














n SECS EF58 


128#30 














SEEK OCIA 


8/54 


99/29 


102#34 










s SEEKTH 0002 


6/ 5 














SEKDEL EFIS 


6/ 6 


102/12 


102/14 


1C2/24 


103/22 


104/13 


105/17 




106/13 


116/12 


126/ 4 


126/ 6 


125/11 


126/13 


127*30 


n SEKOSK EFIB 


127#42 














n SEKSEC EF18 


127#40 














n SEKTRK EF19 


127#41 














SELDEN 00D4 


118/12 


118#45 












SELDRV 0OA4 


8/61 


95/13 


9 8/26 


99/21 


117*42 


125/52 




SENDEN 0380 


8/26 


14/15 


16/27 


97«28 


9 9/26 


99/49 




SERFLG EFOA 


38/15 


91/18 


91/21 


127* 4 








n SERNO OFFC 


126#41 














SETXY 04CE 


30/10 


34#36 












S SHFTKY 0004 


66/42 


67/40 












SHFTTB OaFB 


67/15 


69#32 












s SI. MRS 0057 


87/10 














s SI.RRD 0001 


88/11 














S SJ.S16 0055 


5/60 














s SI.S64 0056 
















s SI.TRD 0002 


89/13 














SIRST 0AF6 


5/61 


8/33 


87# 2 










SKEY 0371 


8/ 9 


19#40 


21/ 3 










s SLDRCT 0003 


68/20 














SLIDEO C899 


67/36 


68*23 












SLIDEL 0880 


67/30 


63» 4 












SLIDER 0884 


67/32 


b8« 7 












SLIOEU 0895 


67/34 


68#25 












SLST 0613 


8/25 


88#20 


90/11 










SPAO 094F 


5/43 


72*26 












S SRPTCT 0006 


60/44 














SSAVE EFEA 


3/41 


129*36 












STEP 0C39 


8/55 


103)»32 












STEP I M 0C4D 


8/56 


104*28 


126/ 8 










STEPQU 0C61 


8/57 


105#27 












STOOIM 06E9 


8/47 


54Jf53 












s SVER 0001 
















s SYS 0005 
















s SYSDAT 0010 
















s SYSL 0006 
















s TAB 0009 


69/ 3 














TEM EFOO 


16/21 


17/ 3 


17/21 


17/40 


18/33 


127«14 


127/15 


n TEMSEC FF20 


127»48 














n TKEY EF5C 


128#10 














S TOTROM 0007 


61/23 


61/36 












S TRUE FFFF 


39/16 














n UNACNT EF52 


127*59 














UNASEC EF55 


18/?5 


127)1161 












n UNATRK EF53 


127*60 














UMCUR 0719 


35/10 
50/14 


36/ 5 
54/11 


37/ 3 
56#43 


37/13 


40/ 2 


41/ 2 


43/ 4 


n UP 003A 


19*36 














UPARW 008A 


66#10 


67/33 
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O 
o 



UPTIM 


0398 


22#17 


58/19 










n USER 


0005 


3# 5 












VALCTS 


0003 


27#17 


31/19 










VALETS 


0010 


26*28 


30/18 










VAUDC 


D3F6 


26«29 


27/17 


31/18 








VAL I DE 


03C* 


25#12 


26/28 


30/17 








VBRIGH 


0468 


31# 8 


33/15 










VCAO 


0030 


19#19 


26/ 6 










VCBEL 


0536 


27/12 


37*43 










VCBKS 


0512 


27/ 9 


37*11 










VCCLRS 


054E 


27/13 


38*10 


49/29 








VCCR 


056F 


27/ 7 


39*15 










VCEOL 


0054 


19#25 


26/20 










VCHOHE 


04F8 


27/14 


36* 3 










VCLF 


0578 


27/ 8 


40* 8 










VCLRS 


OOIA 


19*12 


26/15 


27/12 








VCMCRT 


0570 


27/10 


40*11 










VCMCUP 


0509 


27/11 


36*12 










VDELC 


0057 


19#22 


26/17 










VDELL 


0052 


19*24 


26/19 


50/25 








VECTOR 


0443 


29*10 


32/16 


32/21 








VEGH 


0047 


12/ 8 
26/ 9 


12/12 


12/18 


12/26 


12/36 


12/44 


VEHI 


0028 


19*27 


26/11 










VEUL 


0060 


19*29 


26/13 










S VFLO 


FFEA 


5/44 


34/23 


68/51 








VGRAPH 


0581 


25/ 5 


42* 4 










VHAGR 


0499 


25/ 7 


33*34 










VHALF 


0495 


25/ 6 


33*28 










VHOME 


OOIE 


19*13 


27/13 










VINC 


0051 


19*21 


26/16 










VINL 


0045 


19*23 


26/18 










VLODR 


06F1 


8/45 


48/13 


50/48 


55*16 






VLOIR 


0705 


3/46 


39/ 6 


47/10 


51/16 


53/38 


56*23 


S VLDL 


0034 














S VLL 


0080 


5/35 


18/56 


37/ 5 


37/22 


37/36 


39/ 3 






50/40 


51/ 9 


52/11 


53/25 


54/14 




VLOCK 


0023 


19*17 


26/21 










VNORM 


0467 


25/ 4 


30*21 


33/ 9 


33/20 


33/31 




V00T80 


0581 


31/14 


33/42 


42* 5 


42/45 






V0UT85 


0595 


42/12 


42*19 










VOUT90 


0596 


35/48 


37/18 


37/42 


39/14 


40/ 6 


40/10 






42*23 


44/ 6 


46/17 


47/19 


51/4 




n vaUT95 


0597 


42*27 












V0UT96 


0598 


42*29 


48/18 










V0UT97 


059E 


27/15 
49/16 


29/28 


38/ 9 


42*36 


42/43 


43/10 


VRTOFF 


EFEF 


3/36 


28/27 


34/13 


39/12 


54/52 


68/58 


VSAO 


0053 


19*20 


26/ 7 










VSGH 


0067 


12/ 4 
26/ 8 


12/12 


12/13 


12/22 


12/30 


12/40 


VSHl 


0029 


19*26 


26/10 










VSUL 


006C 


19*28 


26/12 










VUNOER 


0487 


25/ 8 


33* 6 










VUNGR 


0488 


25/ 9 


33*12 










VUNHA 


048F 


25/10 


33*17 










VUNHAG 


0493 


25/11 


33*23 










VUNLK 


0022 


19*18 


26/22 










MBOOT 


02AB 


8/ 8 


14*61 










MBUSY 


00E6 


110/31 


111/57 


115/23 


116/17 


119*28 





19*32 



46/ 5 



42/17 



45/ 8 

129*41 

19*31 
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I- WRITE 0C70 8/21 97/16 107#15 

g n wkTtPE EF23 iZftSl 

9 MSEC 0B60 8/24 96*27 

CD 
00 
IV3 

O 

to 

rj 
o 
t 

3 
O 

O 

o 

3 

T5 



Qsborna CP/N 2.2 CBICS. 



SORCIM 80Sx Asseirblsr var 3.5c <:/55/7= 59:92 Page 1 



E:QCCRAH2 .A.SI* 



*ABS 0000 eFFO 
*C00£ EFFO COOO 
*OaTa £FF0 0000 

;occBioo3.4sy, 



*NDT£* FDR use WITH QCCTXT6.AST ONLY 



P 
o 

3 



402007-00 
2020C7-00 
1D20C7-D0 
401007-00 
201007-00 



HASTER .ASM 
ASSY .ASM 
LISTING .PRN 
fASTER ,CCM 
ASSY .COM 



o 




. ;rev 
;date 
;swc 



Copyright 1982, Osbarne. 

This oroduct is a copyright Drogram product of 
Csborns and is suoplled for use with the Osborne. 

1.3 

FEB 14 1932 



Ravi si ons = 

1. Extensions to CBIOS added by: 
Microcode Corporation. 
Fremont, Ca 

Y. N. Sahae 
August 1981 

2. Prograniniable function keys added by: 
Roger U. Chap-nan 

October 1981 

3» Printer protocols added by: 
Roger W. Chapman 
October 1981 

4. Extensions added to 8ICS and jump table standardized by: 
Roger W. Chapman 
October 1981 



0016 



VERS: 



22 
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LINK 


0CC3I013.ASM 


LINK 


0CC3IQ23.ASM 


LINK 


CCC31033.ASM 


LINK 


OCCSI043.AS<1 


LINK 


CCCBI053.AS»< 


LINK 


CCC3ID63.ASM 


LINK 


DCCSIOTB.AS^ 


LINK 


CCCSI033.ASM 


LINK 


CCCRAM2.ASM 



JJump Table 

JCP/K Qisk definitions 

;Unit record I/Q 

;Non data transfer disk 

•cold and warm boot 

;DisK cata transfer I/Q 

;ut i I i ty routi nes 

JUt i I i ty routi nes 

;Comirom ram oefinitions 



END 



0CC3I303.ASM 



o 



Osborne CP/M 2,2 CBIQS. 
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Revi si ons: 
YNS ISAUGSl 

RWC 050CT31 

RWC I60CT31 



E:OCC8IC13.ASt« 



Changs bios jump vector to call new routines 
standardize cpm Jump table (change calls to jumps) 
addefl function key table and user defined switches 



O 
o 

3 



O 

o 



0005 


HRTRY 


003C 


msi ze 




!ccp; 


CFOO 


CCP: 


£500 


bi os: 


D706 


bdos: 



SMaximunj number of retries. 



5 

63 

{Tisize-3)*102* location of ccp 

OCFOOH 

ccp+16C0h 

ccp+806h 



MSG 'Assemblying SIOS for LWA of •, LMAHE«i«h.« 
•Asserablying BIOS for LWA of FFFFh.' 



= 0100 
= 0010 



= OOOC 
= 002E 



= 0000 
= 0001 
= 0002 



CP/H to host disk constants 



HSTSIZ; 
FPYSI3: 



DSKSl: 
SIDSK: 



WRALL: 
WRCIR! 
WRUAL: 



256 
2048/128 



;BI ocking/Cebl ocki ng buffer sizs 
;Sectors in floppy disk block 



CP/M disk control block equates which define the 
disk types and maximum storage capability of each 
disk type. 

= ;Single density^ single sided. 

((40-3J*2*lC)/FPYSIB 

800S constants on entry to writs 



Swrite to allocated 
•write to directory 
;write to unallocated 



0000 
0001 



ENROM: 
DIROH: 



ROM equates. 



;Port to enable ROM 
;Pcrt to disable ROM 



SORCIM 6C3x Asseirbler vsr 
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Macro far ganerating Control Siocks for disk drives 

The format of these disK control blocKs are as follows; 

16 bits = -> translation table. 

*8 bits = Work area for CP/?^. 

16 bits = -> DI!?SUF. 

16 bits = -> Parameter block. 

16 bits = -> check vector. 

16 bits = -> allocation vector. 



O 
o 

3 
■o 



0003 
0000 
0000 
0000 



N3SK: 
NDFOO: 
ALVSZ: 
CSVS2J 



SET 
SET 

SET 

seT 



;Numter of disk drives 
JNumber of floppy disk drives 
•Allocation vector size 
;Check vector size 



LIST O.Cf 
DPHGEN MACRO TYPE .XLATE, DIRSUF, CPSADR 

NOSK: SET NOSK+1 

OW Zl 

DH 0.0.0 

DH ■ %Z 

DW g4 

OM CSV+CSVSZ 

DH ALV+ALVSZ 

NOfDC: SET NOFOC+1 

CSVSZ: SET CSVSZ+ ( S-t/A) 

ALVSZ: SET AL VS 2+ t C SlCSM+7 >/3 ) 

ENDM 

; Haka sure Systext agrees with asseirblsd size 



; Macro f 


or generating the Disk Parameter blocks. 


: Disk ty 


pe definition blocks for each oarticular mode. 


; The format of these areas are as follow: 


; 8 bi t = 


disk type code 


: IS bit 


= Sectors per track 


; 8 bi t 


= Block Shi ft 


; 3 bit 


= BS mask 


; 3 bit 


= Extant mask 


; 16 bit 


= Disk s'lze/lOZi, - I. 


; li bit 


- Directory size. 


; 16 bit 


= Allocation for directory. 


; 16 bit 


= check area size. 


; 16 bit 


= offset to first track. 


OPBGEN MACRC 


TYPc.SPT.3SH.3S?1.EXM,DS«.DIRSIZ.ALVMSK.0FF5eT 


08 


X\ 


DW 


%Z 


D3 


?3.?4,?5 


cw 


46-1.3:7-1. REV (23) 


DW 


(X7+3»/4 


OW 


%^ 


ENDM 





o 

o 
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The following jjdp taale defines the entry ooints 
into the CBIGS for use by CP/*^ and other externa i 
routines; therfore the order of these jump cannot 
be -nodified. The location of these jumps can only 
be -nodified by ^.OOh locatlonst which is a restriction 
of HCVCPC. 



0000 



E500 



CRG 



BIOS 



O 

o 



E500 


C30CE7 


E503 


C334E7 


E506 


C30BE9 


E509 


C310E9 


E50C 


C315E9 


E50F 


C31DE9 


E512 


C325E9 


E515 


C32DE9 


esis 


C39FE6 


E51B 


C3B0E6 


E51E 


C3D0E6 


E521 


C3F0E5 


E524 


C3F5E6 


E527 


C303E7 


E52A 


C3F0E7 


E520 


C335E9 


£530 


C3FAE& 


E533 


C34FE6 


E536 


C36AE6 


£539 


C063E6 


E53C 


CD63E6 


E53F 


C063E6 


E542 


CD63E6 


£545 


CD63E6 


E548 


CD63E5 


E54B 


CD63E6 


E54E 


C063E6 


E551 


CD63E6 


E554 


CD63E6 


E557 


CD63E6 


E55A 


CD63E6 


E550 


CD63E6 


E56C 


C3CEEA 


£563 


C309EA 





Jmp 


C80DT 




jtno 


WBOOT 




jmp 


cnsta 


CONIN: 


jtnp 


cni n 


CaNOUT: 


JTIP 


en out 


LIST: 


jnp 


1st 


PUNCH: 


jrap 


pnch 


READER: 


jmp 


rdr 




Jf^P 


HDKE 


RSELOK: 


JMP 


SELDSK 




JMP 


SETTRK 




JMP 


SETSEC 




JMP 


SETDKA 


RRDK: 


JHP 


READ 


RMOK: 


JMP 


hRITE 


LISTST: 


jnip 


Istst 




JMP 


SECTRN 


; 


Extensions 


RRI: 


JMP 


ROMS! 




JMP 


ROKJMP 


FMTJ: 


CALL 


ROMCDE 


S3AUD: 


CALL 


ROMCOE 



i eblc: 
ieb2c: 
ieb3c: 
ieb4c: 
i eb5c: 
ieb6c: 
ieb7c: 
i abac: 



IEEE- 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
call 
cal I 
ca I I 
jrap 
jmp 



433 vectors 

ROMCOE 
ROMCOE 
RQMCDE 
RDMCDE 
ROMCOE 
ROMCOE 
RCMCDE 
ROMCOE 
rorticde 
romcde 
romcda 
ac ict I 
ac i Stat 



; C o I d to 1 

;Warir boot 

;Console status (input) 

;Console input 

tConsola output 

JList output 

;Punch output 

iReader input 

;Set track to zero 

;Sel ect di sk unit 

:Set track 

;Set sector 

;Set Disk Memory Address 

;ReaQ from disk 

!Wr i te onto di sk 

JReturn LSI: device status 

;Sector translation routine 



SRom resident call 



;Control Out 

;Status In 

;Go To Standby 

;Take Control 

;Outout Interface »1assa9e 

JOutput Device Message 

;input Oevice Message 

;?arall3l Poll 

Sextensi ons 

; for 

; 3iemor y-mapoed video 

Shook for serial command port hrite 

■hook for serial status port read 



This area is reserved data storage area for 
the set-up program to install printer driverst 
function keys? auto boot comtrandt iobyte valuer 
and auto horizontal scroll flag 

RHC 



£566 40 



iobite: db 



40h 



default to serial printer=4Ch 

parallel printer=80h 

IEEE orinter=cOh 



o 
o 



SORCIM 8C3x Assembler ver 
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o 

3 
■o 



£567 00 



£568 


FF 


E569 


55 


E56A 


80 


E55B 


92E5 


E560 


93E5 


E56F 


9<fE5 


E571 


95E5 


E573 


96E5 


E575 


97E5 


E577 


98E5 


E579 


99E5 


E573 


9AE5 


E57D 


9BE5 


E57F 


9CE5 


E581 


9DE5 


E583 


9EE5 


£585 


9FE5 


E587 


A0E5 


ESS? 


01 



prnter: 


db 


ahsenb: 


db 


brate: 


db 


scrsz? : 


db 


• 




xl tbi : 


dw 




d« 




dw 




dw 




dw 




dw 




dw 




dw 




dw 




dw 




dw 




dw 




dw 




dw 




CM 



acitid: 



ab 



OOh 



TRUE 
si -120 
128 

cntr 10 
cntr II 
cntr I 2 
cntr 13 
cntr K 
cntr 15 
cntr 15 
cntr 17 
cntr IS 
cntr 19 
up 

r ight 
down 
left 
eotb I 



E58A 


07 


cauto: 


db 


cautol 


E583 


4155544F53 
5420 




db 


•AUTCST ■ 




= 0007 


cautol : 


= 


*-cauto-l 


E592 


30 


cntrlO: 


db 


•O" 


E593 


31 


cntrll: 


db 


•1' 


£594 


32 


cntrl2: 


db 


•2' 


E595 


33 


cntr 13: 


db 


•3- 


E596 


34 


cntrl4; 


ab 


'4' 


E597 


35 


cntr 15 : 


db 


•5' 


£593 


36 


cntrl6: 


db 


•6* 


£599 


37 


cntr 17: 


db 


■7' 


E59A 


38 


cntrl S: 


db 


•S' 


E598 


39 


cntrl9: 


db 


■9* 


ES9: 


OE 


up: 


db 


•K'-40h 


£593 


OC 


r ight: 


db 


■L'-40h 


£596 


OA 


down: 


db 


•J'-40h 


t59F 


08 


left: 


db 


•H'-4Qh 




= esAo 


eotbl : 


= 


* 
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Sdefault to standard seriai=0 
!Qume ETX/ACK =1 

'Diablo XON/XOFF =2 

Sauto horizontal scroll enable 
'default baud rate = 120C 
'default screen size = 128 

'Fixed length table 
'contains pointers 
•to strings 
;to decode 
'function keys 



'end of table address 

'auto command = ignore auto boot 

■ = 1 auto on cold boot 

' = 2 auto on warm boot 

• = 3 auto on both 
'length of auto command here 

'auto coiTiinano goes here 



'Variable length table 

'is placed here by set-up 

'program, with xlttbl 

'pointing to the entries 

• 

'default values for the 

'control numerics 

'are the numbers on the keys 



'Default values 
'for the cusor 
'keys are standard 
'values for C?/M 



'space reseverd for full function 
'key decoding and 16 byte auto 
'boot coTi'niand 



ESAO = E&OO 



Sector Translation Tables, 
org 8IDS+2 56 



£600 
E600 



E60A 



0001040508 
090C001011 
020306C70A 
080E0F1213 



XLTS: 



'Translation table 2 to 1 

03 0, 1, 4, 5, 3. 9, 12,13, 16,17 



03 



2, 3, 6, 7, 10,11, 14,15. 18,19 



o 

o 



O 
o 

3 
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= 0000 



Translation 
DB 0, 
03 2, 
OS 4t 
Translation 



DB 

DS 

08 

D3 

IF 

KSG 

ENOIF 



3 to 1 

1. 6t 7, 

3t 8, 9, 
5, 10,11, 

4 to 1 

1, 3, 9, 

3, 10, 11, 

5, 12, 13 

7, 14, 15 



12,13, 

14,15 

15,17 

16,17 

18,19 
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13,19 



t*-XLTS) <> IHSEC*2) 
•Translation table error', ERROR 



O 

o 



€514 




DPBASE: 




E614 






DPH 




+= 0001 


NOSK: 


SET 


E614 


+ 00E6 




OW 


E615 


+0000000000 
00 




DH 


E51C 


+ 80EE 




DW 


E61E 


+ 35E6 




DW 


£620 


+30EF 




DW 


E622 


+ 24EF 




DW 




+= 0001 


NOFDC: 


SET 




+= 0010 


CSVSZ: 


SET 




+= 0006 


ALVSZ! 


SET 


E624 






OPH 




+= 0002 


NOSK: 


SET 


E524 


+ 0056 




DW 


E&26 


♦0000000300 
00 




DH 


E52C 


+ 80EE 




DW 


E62E 


+ 35E6 




DW 


E530 


+ 40EF 




DW 


E632 


+ 2AeF 




OW 




+= 0002 


NOFDC: 


SET 




+= 0020 


CSVSZ: 


SET 




+= OOOC 


ALVSZ: 


SET 



Control aiocKs for disk drives 



DSKS1,XLTS,0IR6UF,CPBS1+1 

NDSK+1 

XLTS 

0,0,0 

DIR8UF 

DPESl+1 

CSV+CSVSZ 

ALV + ALVSZ 

NQFOC+1 

CSVSZ+(64/4) 

ALVSZ+t (SlDSH+7)/3) 



OPHGEN 0SKS1,XLTS,D1RSUF,CPSS1+1 
NDSK+1 
XLTS 
C,0,C 



DIR3U=^ 

DO as 1+1 

CSV+CSVSZ 

ALV+ALVSZ 

NOFOC+1 

CSVSZ+164/4) 

ALVSZ+((SlDSH+7)/3) 



;Dr i ve A! 



JDrive S: 



E634 

E634 
E534 +00 
E635 +1400 
E637 +040F01 
E53A +2DOD3F0080 

00 
E640 +1000 
E642 +0300 



! Disk type definition blocks for each particular mode. 

'^''fiSl: ;SingIe density, single sided. 

DP8GEN OSKSl,2*MSEC,4,15,l,SlDSK,64,10000 00 0DOOOOOOOb,3 

DS DSKSl 

DW 2*MSEC 

C3 4,15,1 

OW SlDSM-1, 64-1, REV < 1000CO0O00CO0OOO3) 



DW 
DW 



(64+3)/4 

3 



o 

o 

3 
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ALVSZ <> ALVS 

•Allocation problems ALVSO ALVSZt ALVSZ= "ALVSZ 



= 0000 


• AL 


IF 
MSG 




.9 


ERROR 




• AL 


ENDIF 



endx CSBSnS2 



o 

o 



O 
o 

3 



O 
o 
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E644 



E644 




Ed-^* 


tFJ 


£645 


C5 


E645 


4F 


E647 


E079 


E649 


3208EF 


E64C 


CI 


E640 




E640 


+ F8 


£645 


+ C9 



SETRRM: 



Revi si ons: 


YNS 


18AIJG31 


YNS 


30AUG31 


YNS 


23SfPSl 


RWC 


CNOV?! 



added iobyts function to I istst 

iTiOdified rotncde routine 

movec cDnst and listst to 03bbios9.asm 

savsa hi in fiOMCOE routine when returning 

to RAy as IEEE routines return status in 

HL 

Preserved value of HL wfien calling ROM 

routines, HL used in VLDOR, VLDIRt Z. STODIK 

preserved HL t OE on exit 



:3et R01-SAM flag 

Entry A= port to outDut (setting RCM or RAM enable) 

none . 

A 



Exit 
Uses 

01 

D3 

PUSH 

MOV 

GT,C 

STC 

POP 

EI ! RET 



CF3h 

3C 

C,A 

A 

A.RQHRAM 

3C 

OFBh 



RET 



E64F 






E64F 


3A03EF 




E652 


4F 




£653 


£079 


i 


E655 


Foei 


i 


£657 


DDEl 


i 


£659 


£1 




E65A 


Dl 




£658 


CI 




E65C 


Fl 




E650 


ED7B6FEF 


i 


£661 






£661 


+FB 




£662 


*C9 





ROMRI: ;Exit RDM resident Interrupt routine. 



LD 


A.ROMRAH 


MOV 


C.A 


OT.C 


A 


POP 


lY 


PDP 


IX 


POP 


HL 


POP 


DE 


POP 


8C 


POP 


AF 


LO 


SPtlESTK 


EI ! 


^ET 


DB 


0F8h 



Sport 

;set ROM or RAH enabled 



• reset to interrupt entry stk 



RET 



o 

o 

3 
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E663 


Dl 


E664 


73 


E665 


D603 


E667 


5F 


E66B 




E563 


1601 



B6bli. 



RaMCDl: 



SOMJMP: 



;Cal I ROM resident processor 

Entry 13E = resident processor to cat I biased 

by CBICS jump vector. 
NOTE: RDM juir.p vector nust match CSICS vector 

Entry at RCHCDl witn low digit of C8I3S vector in reg E 



POP 

MOV 
SUI 

MOV 

LOK 



DE 
A.£ 
3 
EtA 

Othigh (S3MVEC) 



;Get calling address 



SHntry here to ju-np to '^OH function cooe directly 
Entry OE = RC* jump aJdress 

eC « hL . IX = any parameters 



E6&A 


229DE6 


sto 


hi ,3tohl 


E660 




Dl 




E66D 


+ F3 


DB 


0F3h 


e66E 


210000 


LOK 


hL.O 


£671 


39 


ADD 


hLiSP 


E672 


31C1EF 


LOK 


SP.SIOSTK 


£575 


£5 


PUSH 


HL 


E675 


2A9DE6 


Id 


hi .stohl 


£679 




EMARQH 




E579 


+ 


Dl 




E579 


*F3 


03 


0F3h 


Eo7A 


+ D300 


CUT 





E67C 


•■3E00 


LOK 


AtO 


E67E 


+3203EF 


STC 


A,ROMRAM 


E581 


+ 


El 




£681 


+ F3 


CB 


CFSh 


£682 


05 


push 


03 


£663 


FOEl i 


pop 


lY 


£685 


CD9AE6 


CILL 


GORaX 


£633 




CI 




E688 


+ F3 


03 


0F3h 


E639 


FE 


PUSH 


AF 


E68A 




CISRCM 




E68A 


+ 


Dl 




E58A 


+F3 


03 


0F3h 


E6B5 


+ D301 


GUT 


1 


£680 


*3£01 


LOK 


A, 1 


E68F 


+320aEF 


STO 


AjROKRA*! 


£692 


+ 


ei 




£692 


+F3 


OS 


0F3h 


£693 


Fl 


POP 


AF 


£694 


FOEl t 


pop 


iy 


£696 


FDF9 S 


MOV 


SPtiy 


£693 




EI : RET 


£693 


+ FB 


D8 


OFSh 


E699 


+ C9 


RET 




E69A 


GTROM: EI 




E69A 


+ F3 


03 


OFSh 


E693 


FDE9 $ 


JMP 


IlYl 



!Old stacK to hL 

;Save old stack pointer 
Sjet user hi 



;RCy jujip address to IY 



Ssave status returned 



{Restore old stack pointer 



£690 



0002 



STOHL: OS 



o 

o 
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Return disk to home. This routine sets the track number 
to zero. !he current host disk buffer is flushed to the 
di sk. 



» 


E69F 




o 


E69F 


C0AAE8 


i 


E6A2 


AF 


o 


E6A3 


3250EF 


O 

3 


E6A6 


3252EF 


■o 
c 


E6ft9 


3219EF 


? 


E6AC 


321AEF 


O 


E6ftF 


C9 


o 







HQUe: 



CALL 


FLUSH 


XRA 


A 


STG 


A.HSTACT 


STC 


A.UNACNT 


STO 


A.SEKTRK 


STG 


A,3EKTRK+1 


RST 





SFIush host buffer 



SClear host active flag 
JCJear sector count 



£680 



SELOSX: 



E6B0 


79 


E6B1 


FE02 


E6B3 


0201E6 


E686 


3213EF 


£639 


69 


E6aA 


2600 


E6BC 


29 


E6B0 


29 


E6BE 


29 


E6gF 


29 


E6C0 


43 


E6C1 


H14E6 


e&Cf 


19 


E6C5 


E5 


E6C6 


111301 


E6C9 


78 


E6CA 


E601 


E6CC 


CC6AE6 


E6CF 


El 


E6O0 


C9 


E6D1 


210000 


E604 


3A0400 


E607 


91 


E608 


CO 


E609 


320400 


E60C 


C9 



;Select disk drive for next transfer. 
ENTRY 



SELDl! 



EXIT 



HOV 
CPI 

JNC 

STC 

MDV 

HVI 

A3D 

ADO 

ADD 

ADD 

KOV 

LOK 

ADO 

PUSH 

LDK 

KOV 

AND 

CZ 

P3P 

RET 

LDK 
LOA 
SUB 

RNZ 
STO 
RET 



C = disk selection value (0..15). 

DE and 1 = 0» first call for this disk. 

HL = Ot if drive not selectable. 

HL = DPH address if orive is selected. 

A,C 

NDSK 

SELOl 

A.SEKOSK 

L.C 

H.O 

hL.Ht 

hL.HL 

HL.HL 

HL.HL 

a,E 

DE.OPSASE 

HL.OE 

HL 

OE.lOOh + ( low RSELDK) 

A, 3 

1 

ROKJHP 

HL 



HL,0 

CDISK 

C 

A.COISK 



;if invalid drive nunber 



5*2 

:*4 

;*8 

:*16 

;save initial bit 

:HL - DPH address 



;Selsct the disk in reg C 



;lf default drive not in error 



Osborne CP/H 



.2 CBiaS. 



SORCIM SC3x isserblar ver 3.5t <:/55f7= 39:92 Page 12 

t:QCCaiO*3.AS>* 



SET TRACK. 

Set tracK number. Th? track nu.nber is saved for 
use curing a disk transfer oparation. 



I ater 



ENTRY 



6C = track nunber. 



E60D 




SETTRK: 






£600 


ED431<)EF 


$ 


STC 


BCSEKTRK 


E6E1 


2A53EF 




LHL3 


UMATRK 


E6E4 


70 




MOV 


A,L 


E6E5 


A9 




XR& 


C 


E6E6 


4F 




HOV 


C.A 


E6E7 


7C 




MOV 


AtH 


£668 


A8 




XRA 


B 


e6E9 


Bl 




ERA 


C 


E6EA 


C8 




RZ 








; 


MP 


CUfiACT 



!Set track 



ilf same track 



E6E8 AF 
E6EC 3252EF 
E6EF C9 



Clear Unallocated block count (force pra-reads). 



CUNACT: XRA A 

STO AiUNACNT 
RET 



iA = 



;Claar unallocated block count 



Set the sactor for later use in the disk transfer. No 
actual disk operations are oerfotnsd. 



H6FD 79 
EoFl 3220EF 
E6F4 C9 



SETSEC: MOV 
STD 

RET 



Entry BC = sector nuiroer. 

A,C 

Ssector to seek 



A,C 

A.TEKSEC 



E6F5 

E6F5 tD431lEF 

E6F9 C9 



SETOMA: 



Set Disk meiiory address for subsequent disk read or 
write routines. This address is saved in DMAACR until 
the disk transfer is performed. 



E.MTRY 
EXIT 



STO 
RET 



SC = Oisk iremory address. 
0»1AADR = 30. 

BCOMAAOR 



o 

o 



Osborne CP/1 2.2 CBICS. 
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6:GCCBIC43.AS« 
Translate sector nuTiDer from logical to physical. 



ENTRY 



EXIT 



3 


esfa 




SECTRN: 




o 


E6F& 


3A55EF 


LDA 


UNASSC 


o 

3 


E6F0 


&9 


CMP 


C 




E6FE 


C4£Bt6 


CN2 


C'JNACT 


1 


E701 


79 


MOV 


A,C 


b 


E702 


3256EF 


STO 


A.LGGSEC 




E705 


69 


MOV 


L.C 


o 


E706 


60 


HOV 


H.B 


g 


E707 


19 


AOD 


HL.DE 


o 


£708 


6E 


MOV 


L,K 




E709 


2600 


MVI 


H,C 




E70a 


C9 


RET 





Ot = 3. no translation required. 

CE = translation table address. 

SC = sector number to translate. 

HL = translated sector. 



!lf sectors do not match 



o 
o 



o 

o 

3 
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Ravi si ons: 
RWC 20PCT91 

RWC ncCTBl 

RWC I'hCCT^l 



VMS 



20A'jG31 



t 



warm boot makes dir 2 filss across 

included baud rate and screen size i ni ta I i zat i on 

cTange iobyte to variable 

modified auto start feature 

c^anga iobvte defaults 



C P / M 



f r rr 



disk. 



The C3CDT entry point sets control from the colJ start 
loader and is responsible for the basic system initial- 
ization. This includes outputting a sign-on message and 
initializing the following page zero locations: 

Otlt2: Set to the warir-.start junp vector. 

3: Set to the initial I03VTE value. 

4: Cefault and logged on drive. 
5.6.7: Set to a junp to 8C0S. 
ifO-41: Points to v^here Date and Ti-ne are kept 

Register C must contain tie selected drive, which is 
zero to select the A drive. The exit address is to 
the CCP routine. 

The WBOOT entry point gets control when a warm start 
occurs, a *C froir the console, a jump to B;0S (function 
0). or a jump to location zero. Tha WRODT routine reads 
the CCP and 3DuS from the appropriate disk sectors. 
W90DT must also re-initialize locations 0.1.2 and 5.6.7. 
The W'nO'' routines exits with the C register set to the 
aopropriste drive selection value. The exit address 
is to the CCP routine. 



t7CC 




ETOC 


*■' 


E700 




£700 


+ 


E7C0 


♦ F3 


E70E 


+ U301 


£710 


+ 3E01 


E712 


+3208EF 


E7i5 


-I- 


E715 


+ FS 


E716 


78 


£717 


320400 


£71A 


3100CF 



CSODT: 



A= drive to boot off of. 



SEntry 


A= drive 


MOV 


8, A 


DISRCM 




CI 




08 


CF3h 


OUT 


1 


LCK 


A.l 


STO 


A.R^KRAI 


EI 




DS 


0F8h 


MOV 


A.e 


STa 


A.CDISK 


LDK 


SP,CC° 



;save raauesteo dr ive 



:restor3 requested drive 
;farce requested drive 



E71D 


3A66E5 


E720 


320300 


E723 


3A69E5 


E726 


4F 


E727 


CD3CES 


E72A 


3A6Aef; 



Id 


a. i ob i te 


STC 


A,I03YTF 


Id 


a. trate 


mov 


c.a 


call 


sbaud 


Ida 


scrsze 



;get iobyte value 

:3et I /C byte to default 



;set baud rata 



Q 



o 
O 
o 

3 



SORC 
Osborne CP/M 2.2 CEIOS. 



WaOOT: 



E72D 


326CEF 


E730 


3E01 


E732 


1814 »£743$ 


E734 




E73* 


3100CF 


E737 


CD9FE6 


E73A 


110301 


E730 


OlOOCF 


E740 


CD6AE5 


E743 


B7 


E74* 


Z0F4 *E73Ai 


E746 


3E02 



E748 



BCPH: 



E743 


F5 


E749 


018000 


E74C 


CDF5E6 


E74F 


2180E0 


E752 


220FEF 


E755 


AF 


E756 


3260EF 


E759 


3C 


E75A 


323203 


£750 


3EC3 


E75F 


320000 


E762 


320500 


E765 


2103E5 


E758 


220100 


E763 


2106D7 


E76E 


220600 


E771 


2163EF 


E774 


224000 


E777 


218AE5 



SCCP: 
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Jset screen si ze 

iDo CP/K 

SWarm boot 

;flush any buffer 

;Set ROM vector address 



; I f er ror i n r ead 
•indicate warm boot 

;entry A = 01» if cold boot 
A = OZf if war IT. boot 
*F :Save flags 

BCtOBUF ;set default data transfer address 

SETDHA 
HL,HSTBUF 
HL,DKADR 



sta 


1 limit 


Idk 


atl 


J^ 


BCCP 


LOK 


SP.CCP 


CAtL 


HOME 


LOK 


DE.RDMVEC+3*1 


LDK 


BC.CCP 


CALL 


ROHJHP 


OR A 


A 


JRNZ 


BCPM 


mvi 


a>2 



PUSH 

LDK 

CALL 

LOK 

STC 



Jsat ROM DMA addre 



ss 



Clear console control ESC cell 

XRA A 

STC A.ESCH :clear ESC 

'"<= 3 5a = l make directory list two files 

sto atccp+04b2h Schange to ccd 

Set-UD low core pointer cells 

JStore jumps in low mefnory 



LDK 


A.0C3h 


STO 


A,0 


STO 


A, 5 


LDK 


HL,310St3 


STO 


HLfl 


LDK 


hL.BOOS 


STO 


HL,6 


LDK 


HL.IDAY 


STO 


HL.TI1PTR 


LDK 


HL.CAUTO 



• set date-time pointer 



E77A 


CI 


E77B 


3A89E5 


E77E 


AO 


E77F 


283B »E7BC$ 


E781 


7E 


E782 


87 


E7e3 


2837 *E7BC$ 


£785 


1107CF 


E788 


0500 


E78A 


4F 


E78B 


ED60 $ 


E780 


110000 


E790 


1838 *E7CAJ 



:Digital Research has informed SORCIM that CP/M 2.2 
;CANNOT be booted off B:. 

;«anipuIation of COISK is kept here to avoid the bugs 
;which would appear with its disappearance. 
SBooting off B: is accomplished with the RAH cell DSKSWP. 

;cold/warm indicator in b 



pop 


be 


Id 
and 


atacmd 
b 


jrz 


done 


Id 

CRA 


a»thn 
A 


JRZ 


DONE 


LDK 
LOK 


DE,CCP+7 

B,0 


MOV 


C.A 


LOIR 




Idk 


de.O 


Jr 


donel 



• Move command line to buffer 



SORCIM 803x Assembler ver 3.5E <:/55/7= 59:92 Page 16 
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sr Systein' 



^ 


E792 




SIGMQN: 






o' 


E792 


lA 




DB 


'Z«-40h 


7 


E793 


4F73626F72 




m 


•Osborne Compute 


O 




6e6520436F 








1 




6D70757465 










7220537973 








g. 




74656D 








9 


E7AA 


OOOA3630 




DB 


CRtLF,HSIZE/10+ 


i 


E7AE 


46 2043502F 




D3 


•K CP/M 'tVERS/ 


o 
o 

3 




4020322E32 








6768 


41000AOO 




03 


CEI0SV + '3",Ci?.L 





E7aC 




done: 






g" 


E7BC 


3E02 




mv i 


a, 2 


o 


e7BE 


88 




cmp 


b 


g 


E7BF 


2806 *E7C7S 




jrz 


doneO 


s 


E7C1 


2192E7 




idk 


hi tS i gnon 


o 

3 


E7C4 
E7C7 


COFOES 


doneO: 


call 


pr int 




E7C7 


H0300 




Idk 


de«3 




E7CA 




donel: 








E7CA 


2100CF 




Idk 


hi .ccp 




E7C0 


19 




add 


hi ,d6 




E7CE 


3A0400 




Id 


a<cd isk 




E7D1 


4F 




mov 


c»a 




E7D2 


E9 




jmp 


[hll 



•0' 
10 + '0' 



Endx 0SB8iaS5.asm 



s 

■q 



O 

o 
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E7D3 



E7D3 


CnF2£8 


E7D6 


AF 


E707 


3252EF 


E7DA 


CD4BE8 


E700 


El 


E7DE 


Dl 


E70F 


018000 


E7E2 


EDBO 


E7E4 


3A22EF 


E7e7 


37 


E7E8 


ca 


E7E9 


AF 


E7EA 


32S0EF 


E7E0 


F601 


E7EF 


C9 



READ! 



!a CP/H 128 byte sectar. 



EXIT A = 0» successful read oceration. 

A = It unsucessful read operation. 

I bit = 1. successful read operation. 

Z bit = 0, unsuccessful read operation. 



;Move information for transfer 
;Set flag to force a read 

SCIear sector counter 
SFi I I buffer w ith data 



CALL 


MVINFO 


XRA 


A 


STO 


A.UMACfvT 


CALL 


FILL 


POP 


HL 


POP 


OE 


LDK 


3C,123 


LDIR 




LD 


A.ERFLAG 


OR A 


A 


RZ 




XRA 


A 


STO 


AtHSTACT 


OR I 


OOlh 


RET 





:Move 128 bytes 



• If no srror 

JCIear host active 
JSet error flag 



E7F0 



WRITE: 



E7F0 


coFzes 


E7F3 


79 


E7F* 


3223EF 


E7F7 


FE02 


E7F9 


2011 "E80CS 


E7F3 


3E10 


E7FD 


3252EF 


E800 


2A19EF 


E803 


2253EF 


£806 


3A56EF 


E809 


3C 


E80A 


1819 -E325S 


E80C 


2152EF 


E30F 


7E 


E810 


B7 


E311 


CA2AE8 


E814 


35 


E315 


3A55EF 


E813 


3C 


E819 


FE14 


ESIB 


2008 *ES25$ 



WRIT2: 



:the selected 128 byte CP/m sector. 

ENTRY C = Ot write to a previously allocated block. 

C = 1. write to the directory. 

C = 2f write to the first sector of unallocated 
cata block. 

EXIT A = 0» write was successful. 

A = 1, write was unsucessful. 

write was successful. 

0» write was unsucessful. 

SMove information for transfer 
;Write type in c 





Z bit = 1, 




Z bit = 0. 


CALL 


KVINFO 


MOV 


A,C 


STO 


A,WRTYPE 


CPI 


WRLAL 


JRNZ 


WRIT2 


LDK 


A,204S/128 


STO 


A.UNACKT 


LO 


HLtSEKTRK 


STO 


HL,UNATRK 


LD 


A.LOGSEC 


INC 


A 


JR 


HRIT3 


LDK 


HL.UNACNT 


LD 


A.thll 


CRA 


A 


JZ 


KRIT4 


DEC 


Chll 


LO 


A, u;-! AS EC 


INC 


A 


CPI 


2*10 


JRNZ 


VRIT3 



;l f wr it e to all ocated 



;JNAT?K = SEKTRK 



!If no unallocated records 
: dec una 1 1 00 record count 
SIncreirent logical sector 



llf not end of track 



o 

o 



O 
o 

3 



O 



Osborne CP/M Z-2 CBICS 



WRIT3: 
WRIT4: 
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E313 


2AS3EF 


E820 


23 


E821 


2253EF 


E824 


AF 


£825 


3255EF 


E828 


3eFF 


E82A 


CD4EE3 


E820 


01 


E82E 


El 


E82F 


018000 


E832 


EDBO 


EBB't 


3E01 


E836 


3251EF 


E839 


3A22EF 


E83C 


37 


E830 


CO 


E835 


3A23EF 


£841 


FEOl 


£8*3 


CCAAE3 


£846 


3A22EF 


£849 


B7 


E84A 


C9 



o Ffi3A 3251EF STG A.HSTHRT ;HSTI«IRT = 1 



LD 


HL.U.MATRK 


INC 


HL 


STO 


HL.'JNATRK 


XRA 


A 


STC 


A.UNASEC 


LDK 


AtOFFh 


CALL 


FILL 


POP 


DE 


POP 


HL 


LDK 


BC,123 


LOIR 




LDK 


A.l 


STG 


A,HSTHRT 


LD 


AiERFLAG 


OR A 


A 


RNZ 




LO 


AfWRTYPE 


CPI 


WRC3R 


cz 


FLUSH 


LD 


AtERFLAG 


ORA 


A 


RET 





;lf any errors occurred 

:wr i ta type 

;to directory? 

;Force write of directory 



Osborne CP/M 2.; 
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E848 
E84e 
£951 
E854 
E857 
E35S 
£859 
E853 
E85C 
E850 
E85E 
E860 
6863 
£366 
E867 
E865 

E869 
E86C 
E86D 
E86F 
£870 
£872 
E875 
£878 
E87A 
E87B 
E87C 
E87E 
E87F 
E880 
E882 



E886 
£889 
E88C 
E88F 
E892 
£895 
E893 
£898 
E89E 
E8A1 
£8A4 
E8A5 



3221EF FILL: 

1180E0 

218000 

3A18EF 

EB 

OF 

3001 "■E85C$ 

19 

£8 FILL3: 

29 

E67F 

3218EF 

2A11EF 

E3 

D5 

E5 

2150EF 

75 

3601 

B7 

2314 *ES86$ 

211CEF 

1H3EF 

0604 

lA FILL4: 

as 

2005 •■£833$ 

23 

13 

lOFS *E87A$ 

C9 



£883 CDAAE8 



SAIBEF 

321FEF 

3217EF 

2A19eF 

221DEF 

2215E'= 

3A18EF 

321CEF 

3214EF 

3A21EF 

S7 

CO 



FILLS: 



FILL6: 



FILL - fill host buffar with approprite host sector. 



ENTRY 



EXIT 



ST a 

LDK 

LDK 

LD 

EX 

Ri?C 

JRNC 

AOO 

EX 

ADD 

ANI 

STO 

LO 

XTHL 

PUSH 

PUSH 

LOK 

LO 

STO 

OR A 

JRZ 

LDK 

LOK 

LOK 

LD 

CMP 

JRNI 

INC 

INC 

OJNZ 

RET 

CALL 



A = C» Read raquired if not tr> buffer. 
Otherwise read not requiraa. 



Ot exit the stack kill contain the following 

va I ues: 

POP X ;x = host record address. 

POP y ;y = caller's buffer address. 



A.ROFLAG 
DEfHSTBUF 
HL,12e 
A.SEKSEC 

DEtHL 

FILL3 

HL.OE 

DE.HL 

hL.HL 

07Fh 

A.StKSFC 

HL,Df<AADfi 

OE 
HL 



;Save read flag 
; ini ti al offset 
tl28 byte records 
SGet logical sector 



!If low bit not set 
lAdd bias to offset 



JMask sector 

•Set return parameters 
;Set return address 
Shost acti ve flag 
•always becomes 1 
;if host buffer inactive 



HL.HSTACT 

A, thll 

Uthl] 

A 

FILL6 

HL.HSTSEC 

OE.SEKSEC 

6,SEK0SK-SEKSEC+1 

A, tdel 

Chl3 

FILLS ;if mis-match 

HL 

DE 

FILL4 ;if all bytes not checkad 



FLUSH 



EeA6 3EO0 

E8A8 181C »£3C6$ 



LO 


A.SEKOSK 


STO 


A.HSTDSK 


STC 


A.ACTDSK 


LD 


HL.SEKTRK 


STO 


HL.HSTTRK 


STQ 


HLtACTTRK 


LO 


A,SEKS£C 


STO 


A.HSTSEC 


STG 


A,ACTSEC 


LO 


A.RDFLAG 


CRA 


A 


RNZ 




LDK 


A.O 


J'? 


FINAL 



;Flush host buffer 
;Move disk and type 



;lf no read required 
;Read 



9 



o 

o 

3 
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ESAA 




ifSAA 


2151EF 


E3A0 


7? 


E6AE 


S7 


E8Af= 


CS 


E8B0 


3600 


6382 


3A1FEF 


Esas 


3217EF 


E3B3 


2A1DEF 


6888 


2215EF 


EaSE 


341CEF 


E8C1 


3214EF 


E8C4 


3£03 



flush: 



FLUSH - Writa out active host buffer onto disk. 



;lf host buffer already on disk 
;»!ov€ oi sk and type 



LOK 


HLiHSTW^T 


LD 


A. Chi] 


OR A 


A 


RZ 




STQ 


o.thn 


LD 


A.HSTDSK 


STD 


A.ACTOSK 


LO 


HL.HSTTRK 


STO 


HL.ACTTRK 


LO 


A.HSTSEC 


STC 


A.ACTSEC 


LOK 


A, 3 


JMP 


FINAL 



iWri te f lag 



E8C6 



final: 



EBC6 


5F 




E8C7 


1600 




E8C9 


212701 




E3CC 


19 




esco 


2209E9 




E3D0 


211^EF 




ES03 


3^ 




E8D4 


3Eu5 




E806 


3205EF 




E809 


2A09E9 




E3DC 


EB 




ESDD 


0601 




ESOF 


CC)6Ac6 




E3E2 


3222EF 




ESE5 


C8 




ESE6 


3405EF 




E8E9 


3D 




E8EA 


20eA *E8C 


bi 


ESEC 


F601 




E8ES 


3222EF 




ESFl 


C9 





FNLl: 



E?JTR¥ 
Cal Is: 



LOK 
LDK 

ADO 

STC 

LDK 

INC 

LOK 

STO 

LO 

EX 

LOK 

CALL 

STO 

RZ 

LO 
EEC 

CRI 
STQ 
RET 



SPreform final transfer crccessing. 

A = .. read disk. 
= 3 .. write disk- 
Rom resident routine to reaQ/nrite GNE 
sector only. 



E.A 

DtO 

HLiRDMVEC + 3*13 

HL.DE 

HL.SAVADR 

HLtACTSEC 

[hU 

A, MRTRY 

A.RTRY 

HLfSAVADR 

DE.-IL 

e,i 

ROMJS^P 
AjERFLAG 



A.RTRY 

A 

FMLl 

Clh 

A.ERFLAG 



;upaate sector+1 
;Set retry count 
;Clear retry count 



Jindicats one sector xfer 
;process read or write 
;set oossicle error flag 
; I f no errors 

;Get retry counter 

ilf not permanent error 

:Set error f lag 



endx 



05331056. asm 



o 

o 



o 

o 

3 



O 
o 



Osborne CP/.M 2.2 CBIOS- 



E8F2 

E8F2 AF 

E8F3 3222EF 

ESF5 3A20EF 

E8F9 3218eF 

E8FC C9 
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E8FD 7E 

E8FE B7 

ESFF 23 

E900 ce 

E901 E5 

E902 4F 

E903 C00CE5 

E906 El 

£907 18F4 *E8F0$ 

E909 = 0002 



PRINT: 



E:QCCBI073.ASK 
MVINF3 >»ove inforiration necessary for transfer. 



XRA 
STO 
LQ 

STO 
RET 



AiERFLAG 
A.TEKSEC 
A.SEKSEC 



SCIear arror flag 



LO 

Q.RA 

INC 

RZ 

PUSH 

HOV 

CALL 

POP 

JR 

SAVADR: OS 



Print message teminated by zero byte. 

ENTRY HL -> message buffer, ter.ninated by zero. 

EXIT HL -> zero byte + I. 

A = 0. 
2 bi t sat. 

Destroys only HL . Flags, and A registers. 

:Get a character 



A. thj] 

A 
HL 

HL 

C.A 

CONOUT 

HL 

PRIMT 



!If zero the terminate 



SOutput to the console 



JDisk transfer routine vector 



o 

o 
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Revi 3 


ons: 




VMS 


2CAUGS1 


Initja 


YNS 


29AUG31 


Expand 


YNS 


01SEP81 


Added 


YNS 


05SeP31 


Invert 


YNS 


C5S;P81 


Return 
al 1 in 


YNS 


C8SEP31 


F i xed 


YNS 


20SEP31 


fiecode 
unl i st 


YNS 


29SEPS1 


Add au 


RWC 


14CCT31 


Reassi 
Rsdefi 
P r 1 n te 
Functi 


RWC 


20CCT81 


Hor i zo 


RWC 


240CT31 


Hor i zo 



3.5t <:/55/7= 59:92 Page 22 
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I release 

ed trans, table to include ctl /numerics 

parallel port support 
data to/from parallel port 
character in C as well as A froir. 

put routines. 

"sorae" i eee bugs 
ieee drivers to send untalk and 

en comirands after each char xfr. 

to hor iz. scro I I 

gnment in dispatch table 

nition of iobyte assignments 

r protocols added to serial list device 

on key decoding added 

ntal scroll toggle added 

ntal scroll modified 



the following routines will use the IOBYTE to transfer 
control to the appropriate device driver 



E903 

E90a 2179E9 

E90E 



return console status 

CNSTA: 



pr oc 
Idk 
1806 *E918$ jr 



hi .ptr*cstat 
Qodisoch 



; status table 

; call appropriate r tn 



E910 

E910 218ie9 

E913 1803 *£918$ 



E915 

E915 2189E9 

E918 

E918 0501 

E91A C33DE9 



E91D 

£910 060* 

e91F 219959 

E922 C33DE9 



E925 



read input character from device 
CNIN: 



pr oc 

Idk 

jr 



hi »otr*c inp 
godi spch 



table of input rtns 



put output character to device 
c contains output character 



CNOUT: 



proc 
Idk 



godi spch: 



mv I 



hi .ptr^cout 
b.l 

jrap disoch 

list device character output 



: table of output rtns 

Snumber of shifts required to align 
;CONSOLE field 



LST! 



proc 
mv i 
IdK 

jrap 



bt4 

hi .Dtr«-1 ist 

di spch 



;tabls of list routines 



output to punch 
PNCH: proc 



Osborne CP/M 2.2 CBIOs!''' '""' ''''"'''' "'' ''" ' = ^"'^= "^^^ '-^- " 

t:C!CC8ID83.AS« 



9 


u:>uur 


ne k.r/n ^, 


i UBIOS. 




5 

CD 

e 


€925 
E927 

£92.4 


0606 

2189E9 

C330E9 


Idk 
jnip 


bf 6 

hi tptr «-pnch 

Oi spcn 


1 






; reader inout 




1 

to 


E92D 
E92D 
E92F 
E932 


0608 

218169 

C33DE9 


?^£>R5 proc 
mv i 
Idk 
jmp 


b,S 

hi .Dtr<-rdr 

dispch 



; punch routines 



; reader routines 



E935 

£935 060't 

E937 2191E9 

E93A C330E9 



LSTST: 



List Status. 

Return the ready status for the list device. 

EXIT A = (zero), list device is not ready to 
accept another character. 

A = FFh <255), list aevice is ready to accent 
a character. 

ulr'nelftbits'a'.^f '^^"'^ depending upon the iobyte fielos 
= 0: status of crt. (always ready) 
-1: status of serial printer 
=2: status of parallel printer 
-3t status of ieee port (always ready) 



proc 
mv i 



Idk 

JTIP 



hi .ptr«-lst 
di spch 



;number of left shifts thru carry 
;to align LIST field of lOEYTE 
•list status routines 



o 

o 



Osbor 

£■530 
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3 


E93D 


229DE6 


Sto 


m .stohl 


O 


E9'tO 


210000 


Idk 


hl»0 


o 

3 
■o 


£943 


39 


add 


hi tSD 


E94^ 


3179E9 


Idk 


sp«d isstk 


c 


E9*7 


E5 


push 


hi 


-1 
O 

Q 


E943 


2A9DE6 


Id 


hi, stohl 


1 


E94a 


3A030O 


Ida 


iobyta 


% 


E94E 




dspchl! 




o 


E94E 


17 


ral 




3 


E94F 


lOFD *E94E$ 


djnz 


dspchl 




E951 


£606 


an i 


6 




E953 


5F 


mov 


eta 




E954 


1600 


Idk 


d.O 




E956 


19 


d3C 


ae 




£957 


5E 


mov 


e.ir. 




E958 


23 


inx 


hi 




E959 


66 


mov 


h.in 




E95A 


6B 


mov 


Ue 




E953 


1160E9 


Idk 


detdspret 




E95E 


D5 


PLish 


de 




E95F 


E9 


pchi 






£960 


FDEl S 


dspret: pop 


iy 




E962 


FDF9 * 


mov 


sp«iy 




E964 


C9 


ret 






E965 


= 0014 


ds 


10*2 




E979 


= 0000 


disstk: ds 

; addresses of 



routi nas 




E979 




ptr*cstat: 






E979 


A1E9 


dw 


const 




E97B 


6BEA 


dw 


sistat 




E97D 


D4E8 


dw 


pi Stat 




E97F 


F3EA 


dw 


ieinstat 




E981 




ptr«-rdr : 






E981 




ptr«-cinp: 






E981 


32E9 


dw 


key i np 




£983 


74EA 


dw 


SS i np 




E985 


FOEB 


dw 


par inp 




E987 


2FEB 


dw 


ieinp 




E989 




ptr*-pnch: 






E989 




ptr«-cout: 






£989 


F5E9 


dw 


crtout 




E9SB 


87EA 


dw 


spout 




E930 


04EC 


dw 


parout 




e98F 


33 EB 


QW 


ieout 



dispcn: proc 

on entry here reg a contains the laft shift coLnt 

required to align the iobyta field to bit 1 position, 

and rag HL contains address of select table 

A special stack is usee to avoid overflows (eg when 
cal I ed by WordStar) 

;Save hi 

;Old stack to hi 

;Save old stack 
;Sestore hi 



;3et select field* 2 
5 de = i obyte field 



; get the routine address 

; into hi for xchange with pc 



;oush return address 
;jump to routine 



;Restore old stack 



keyboard status 

serial port input status 

parallel input status 

status of input davice on IEEE port 



get input from keyboard 
seri al port input 
para I lei i nput 
ieee port input 



output character to 
serial port output 
parallel output 
ieee port output 



or t 



o 

o 



O 

o 

3 



Osborne CP/K 2.2 



E991 




E991 


F3£9 


E993 


62EA 


E995 


CIEB 


£997 


F3E9 


E999 




E999 


FSE9 


E99B 


9SEA 


E990 


0*£C 


t99F 


33E3 



;3ios. 



;iM SOSx Assetrbier ver 3.5E <:/55/7= 



ptr*l sti 



ptr<-l i St: 



dw 
dw 
dv« 
dw 
t: 
dw 
dw 
dw 
dw 



crstat 
sostat 

postat 
i eosta t 

cr tout 
pr tout 
parout 
i eout 
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serial output status 
parallel output status 
ieee output status 



o 
o 
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C C N 



D L 



STATUS 



This ro'jtine samples tha Console status and returns ths 
fallowing values in tl^e A register. 

EXIT A = (zero), (neans no character 
currently ready to reaa. 

A = FFh (255). sneans character 
currently ready to read. 



= OOOD 



nokey equ 



OOh 



Jindicates key not present 



o 

o 



E5A1 

E9A1 3AC2E9 

Eti.'i 57 

e9A5 2C05 »£9A0S 



C3NST: proc 

! check if any translated keys are pending 

Id a.count 

ora a 

jrnz const5 
! if no xiated keys pending, check keyhi t flag 



E9A7 


3A5EEF 


LO 


A.LKEY 


E9AA 


EEOO 


xr i 


nokey 


E9AC 


C8 


Ri 




E9AD 




constS: 




E9AD 


F6FF 


OR I 


OFFh 


E9AF 


C9 


RET 





;Get Key hit flag 

;if cata not available 
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Routine name: KEYINP - gets keystroke from rom kbd driver. Translates 

the codes 8Qh to Sfh as per table. 

Outputs: A = translated code in ASCII 
All registers are destroyed 



o 
O 



E9ao 



= 0030 
= 0002 



basvIO 
xl tkey 



equ 
ds 



80h 

2 



Slowest value cf translatable keys 



E9S2 



O 
o 



KEYINPs proc 

; if thare are no xiated keys waiting then 

S call the keyboard driver in roir 



E982 


COOFEA 






call 


ahscr 1 


E935 


21C2E9 






Idk 


hi icount 


£968 


7E 






Id 


at Chn 


E9B9 


87 






or a 


a 


e9SA 


2809 "£905$ 




Jrz 


kinlO 


E9BC 


DD2AB0E9 


$ 




Id 


ixtx Itkey 


E9C0 


D07E 






db 


0DDh,7£h 


E9C2 


00 




count: 


db 





E9C3 


3* 






inc 


[hll 


E9C4 


C9 






ret 




E9C5 






kinio: 






E9C5 


iE09 






Idk 


e> low! conin) 


E9C7 


CD58E6 






call 


romcdl 



Jget nuraber of xiated keys 

Jif keys pending then 
tget base address in IX reg 
;siraulate LO A.tlX+COUNT) 
;to get next key from table 
tinorenient count 



When console has returned this code will check 
for function key and oreform some translation 



E9CA 


FE80 




cpi 


SOh 


E9CC 


08 




re 




E9CD 


FE8E 




cpi 


sen 


E9CF 


DO 




rnc 




E900 


C827 


$ 


sla 


a 


E9D2 


5F 




mov 


e.a 


E9D3 


1500 




Idk 


d.O 


E9D5 


0D216BE5 


$ 


Idk 


ix.xltbl 


E909 


D019 


$ 


add 


i X « de 


E9D3 


Q06E00 


$ 


Id 


l.tix+C] 


E90E 


006601 


i 


Id 


h. Cix+ll 


E9tl 


D05E02 


i 


Id 


e. [ix+2] 


E9E4 


005603 


s 


Id 


d.tix+3: 


E9E7 


ED53eOE9 


i 


sto 


detx Itkey 


E9E8 


ED52 


$ 


sbc 


hi ,de 


E9E0 


7D 




mov 


a> 1 


E9EE 


32C2E9 




sto 


a » c un t 


E9F1 


13BF "£982$ 


jr 


keyi np 



function keys have value 

8Ch-safi 

do a shift to make pointer 

into table and retjrn if not function key 
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O 

o 

3 



E9F3 
E9F3 

E9F3 F6FF 
E9F5 C9 



rout i ne! 



iaostat: 

CRSTAT: proc 
or i 
ret 



CRSTAT 

returns status of crt. 

crt is always ready 

IcOSTAT returns status of ieee 

ieee always appears to be ready 



OFFh 



routine raree: CRTOUT 
inputs: C: output character 





= OOOB EF 


*ESC: 


= 


8 




= 0001 EF 


♦ GRi 


= 


1 


e9F5 


CRTOUT: 


proc 




E9F6 


3A60EF 






Ida 


esch 


E9F9 


ES09 






and 


ef «-esc+ef<-gr 










push 


af 


E9Fe 


2000 *EA0At 






jrnz 


crtlO 


E9FD 


79 






I710V 


a»c 


E9FE 


FE14 






CO i 


I'th 


EAOO 


2008 *E40AS 






jrnz 


crtlO 


eA02 


3A68E5 






Id 


atahsenb 


EA05 


2F 






etna 




EA05 


3268E5 






sto 


a»ahsanb 










pop 


af 


EA09 


C9 






ret 




EAOA 


cr 


tlO: 














call 


Dutch 










pop 


af 










rnz 












mv i 


a»cr 










cmp 


c 










cz 


ahscrl 










ret 





lescape flag bit definitions 



EAOA 

EAOA lEOC 

EAOC C368E6 



outch: 



sbrt: outch - calls rom cout routine 



Idk 
jmp 



e» low( conout ) 
rotncdl 



Soutpjt to crt 



EAOF 

EAOF 3A68E5 

EA12 B7 

EA13 C8 



; sbrt: ahscrl - does auto horizontal scroll if required, 
ahscr I : proc 

Id aiahsenb 

or a 

rz 



EA14 2A5AEF 
EA17 29 



Id 

add 



hi tcur s 
h I t h I 



!get cursor 



EAIS 3E64 



check for cursor in home windOK 
Idk a. 100 



o 

o 
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O 
o 



EAIA 


80 


EAie 


3809 *EAZ6t 


EAID 


3461EF 


EA20 


D6eA 


EA22 


C8 


eA23 


AF 


EA24 


1818 "eABEt 



EA26 



EA26 


3A61EF 


EA29 


D6EA 


EA2B 


C6&4 


EA2D 


BD 


EA2E 


DA3BEA 


cA31 


06 5 A 


EA33 


BD 


EA34 


D8 


EA35 


7D 


EA36 


D60A 


EA3S 


CB 


EA39 


1803 »EA3Ei 


EA3B 




EA33 


70 


EA3C 


D564 


EA3E 




EA3E 


IF 


EA3F 


C620 


eA4i 


2161EA 


eA44 


77 


EA'VS 


3A62EF 


EA48 


E&IF 


EA4A 


C620 


EA4C 


23 


EA4D 


77 


EA4; 


23 


EA4F 


23 


tA50 


0604 


EA52 




EA52 


C5 


EA53 


E5 


EA54 


4E 


EA55 


CJOAEA 


EA5S 


£1 


Efl59 


CI 


EA5A 


23 


EASa 


10F5 *EA52$ 


E45D 


C9 


EA5H 


13 


EA5F 


53 


EA60 


00 


EA61 


00 





cmp 


1 




jrc 


rhc 




Id 


at pi aad 




sub 


Vf |3 




rz 






XT a 


a 




jr 


scr 1 


rhc: 






• 


check 


right-hand margin 




Id 


a . p i aa d 




sub 


vf lo 




add 


a, 100 




cinp 


1 




jc 


:30 


: 


check 


left hand margin 




sub 


90 




cmp 


1 




re 






mov 


a,l 




sub 


10 




TZ 






Jr 


scr 1 


:30: 








mov 


a» 1 




sub 


100 


scr 1 : 


rar 






add 


a. • • 




Ik 


hi »3scsq+3 




sto 


a.thll 




Id 


a.pi abd 




ana 


Ifh 




add 


a,' > 




dec 


hi 




sto 


a, [hi] 




dec 


hi 




dec 


hi 




Ik 


b.4 


:5Q: 








push 


be 




push 


hi 




Id 


ccnn 




call 


ou tch 




pop 


hi 




pop 


be 




inc 


hi 




djnz 


:50 




ret 




escsq 


db 


esc 




do 


'S> 




CD 







db 


c 



^j r, , . >^wf jwi llt^b III ilUIIlB niilUUW 

Schack for screen at home 

;screen at home 
Shome screen 



;a=hor izonta I screen position 

SwinOow size*2 (49) 

;(ncve screen when cjrsor about to go off 
• the right hand irargin 



Jcheck left margin 
Scursor in window return 



;return if cusor at column 2 



;asesg+2 = vert, coords 
Jpoint to start of esc seq 



Jset screen coord escaoe sequence 



;** y coord 
;** X coord 
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EA62 

EA62 C3D9EA 

EA65 6602 

EA67 C5 

eA63 F6FF 

EA6A C9 



EA63 

EA6S CD09EA 

EA6e £601 

EA70 C? 

EA71 F6FF 

EA73 C9 



i routines 

SOSTAT: pr oc 
cal I 
an i 
rz 
or i 
ret 

;*« 

J rout i ne: 



SISTAT 



pr oc 
cal I 
an i 
rz 
or i 
ret 



::0CCS1C33.AS^' 



SQSTAT 

gets Status of output aevice attachad to larial port 



ac i Stat 
si .trdy 



;get 6850 status 

{return with not ready status 



SISTAT 

gets status of input device attached to serial port 



ac i Stat 
s i .r rdy 



;return with not ready status 



rout i ne: 



EA74 




S P T NP : 


proc 




EA7* 


CD6BEA 




ca 1 1 


sistat 


EA77 


28FB "EA74J 




jrz 


SPINP 


EA79 


CDIEEC 




call 


sw2r on) 


EA7C 


AF 




xra 


a 


EA7D 


32D8EA 




sto 


a. serf Ig 


EA80 


3A012A 




Id 


a«h.srec 


EA83 


^F 




mov 


ct a 


EA84 


C32CEC 




jrap 


sw2rain 



5PINP 

Inputs a character froir the serial port 

°.es9ts serfig to show Receive Data Register has 

been read (RORF bit = C>. 

A ROM call isn't used to input since the RCM 

doesn't fudge status to get around the hardware tilting 

pr ob I em 



if not ready 



;reset RDRF bit 
;get data 



rout ine: 



EA87 






SPOUT: 


proc 




EAST 


C5 






push 


be 


EA38 


C362EA 




:1: 


cal 1 


sostat 


EA83 


28FS *E 


A83t 




Jrz 


:l 


EA80 


CI 






pop 


be 


EASE 


CDIEEC 






cal 1 


sw2rom 


EA91 


79 






mov 


a.c 


EA92 


32012A 






sto 


af h. sxirt 


EA95 


C32CeC 






J'np 


sw2ram 



SPOUT 

Outputs character in reg c to the serial port (list device} 
Since the ROH doesn't fudge status to get around the 
hardware timing probleirt output is done directly 



;save character 
;if not ready 



;sena chr 



; routine does serial i/o and does printer protocols 



o 

o 
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fi- 




= 0011 


xon: 


= 


llh 


3- 




= 0013 


xoff: 


= 


13h 


e 




= 0003 


etx: 


= 


3 


1 




= 0006 


acK: 


= 


6 


9 
S 


eA9S 




! 

pr tout: 






EA98 


CD87EA 




call 


spout 


3 


EA9B 


3A57E5 




Id 


ai pr nter 




EA9E 


B? 




or a 


a 


§ 


EA9F 


C8 




rz 




■o 


EAAO 


E602 




an i 


2 


1 


EAA2 


2013 »£AB7$ 




jrnz 


xonxof 


o 


EAA4 


3E0D 




mv i 


arCdh 


1 


EAA6 


B9 




ctnp 


c 


13 

o 


EAA7 


CO 




rnz 




3 


EAAB 


0E03 




Idk 


c»etx 


1 


EAAA 
EAAO 


C387EA 


prtlO: 


call 


spout 




EAAD 


CD74EA 




cal 1 


spinp 




EABO 


E67F 




ani 


7fh 




EA62 


FE06 




cp i 


ack 




EAS4 


20F7 *EAAO$ 




jrnz 


prtlO 




EAB6 


C9 




ret 






EAB7 




xonxof : 








EAST 


C06BEA 




call 


sistat 




EABA 


B7 




ora 


a 




EABB 


C8 




rz 






EA8C 


C374EA 




cal 1 


spinp 




EABF 


E67F 




ani 


7fh 




EACl 


FE13 




cpi 


xoff 




EAC3 


CO 




rnz 






EAC4 




prt20: 








EAC4 


CD74EA 




call 


spinp 




EAC7 


E5 7F 




ani 


7fh 




EAC9 


FEll 




cpi 


xon 




EACB 


20F7 *EAC4t 




jrnz 


prt20 




EACO 


C9 




ret 
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Sraask out pari ty bit 



.mask out parity bit 



Smask out parity bit 



routine: 



EACE 




EACE 


COIEEC 


EADl 


79 


EA02 


32002A 


EAD5 


C32CEC 



ACICTL: 



pr oc 
call 

mov 
sta 

jnip 



ACICTL 

outputs character in c to the ACIA CTL port. 



sw2rom 
atc 

h.sctr I 
si<(2rain 



routine: acistat 

returns usart status in A 
The ringin signal is read from the oia at address 2cC0 
and merged in at the overrun error bit of the ac i a status 

A hardware tining problem results in the RORF (Receive Data 
Register Full) sometines being reset oefore the Receive Data 
Register has been read. To get around this, a flag Iserfig) keeps 
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tracK of the correct status. Every time the status register 
is read» serflg is updated. If the RDRF bit is ever set in the 
status register, that bit remains high in serflg until the 
Receive Data Register is read. The RORF bit from serflg is 
ORed in with the status register to give the correct status. 



O 
o 





= 2C01 


r i 


port 


equ 


h. vi ot 1 




= 0040 


r i 


bit 


equ 


040h 




= 0020 


or nask 


equ 


02 Oh 




= 0001 


RDRFm 


equ 


OOlh 


EAOS 


00 


serflg 


db 


00 


EAD9 




ac 


istat 


: oroc 




EA09 


CDIEEC 






call 


swZrom 


EAOC 


3A012C 






Ida 


r i port 


EAOF 


OF 






rrc 




EAEO 


E620 






an i 


or mask 


EAE2 


4F 






mov 


c.a 


EAE3 


3A002A 






Ida 


h.ssts 


EAE6 


E60F 






an i 


Cf fh-ormask 


EAE8 


Bl 






ora 


c 


EAE9 


4F 






mov 


c« a 


EAEA 


SADSEA 






Ida 


serf Ig 


EAEO 


E601 






an i 


RDRFm 


EAEF 


81 






ora 


c 


EAFO 


32D8EA 






sta 


serf U 


EAF3 


C32CCC 






Jmp 


sw2rani 



;Tia3k3 out all bits except RCRF 
;flag to keep track of RDRF bit 
; ( to correct far hardware timing problem) 



Jread in ringin signal 
;shift ring in to overrun er 
;pos it ion 
:get ring in 



;rernove overrun error bit 
;mer ge ring in bit 



;get RDRF bi t 
Ssave new status 



o 
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O 



a 
O 
o 

3 



I££c dr i vers : 



The routin 
transfer c 
OSBORNE IE 
th e ca I I I 
transi ent 
attached n 
The functi 
Unfortunat 
indi cates 
has to rea 
lEINSTAT m 
has to rea 
be buffere 
only when 
that the b 
IEEE devic 



63 IE! 
haract 
EE por 
E«-ftDRS 
progra 
ust be 
on lEI 
ely th 
that i 
d the 
lany ti 
d the 
d ti 1) 
the bu 
f r i s 
e> 



NSTAT, 
ers to 
t. Th 
. Mo 
mme to 

addra 
NSTAT 
ere is 
t has 
charac 
irss ba 
char t 

cal i 
ffer i 
emptyj 



lEINP a 

and fro 
e addres 
f aci I i ty 

spec! fy 
ssabie a 
returns 

no Stan 
a charac 
ter devi 
fore cal 
o determ 
to lEIN? 
s eirpty. 

a nut 1 



nd lEOUT 

rr an lEE 

s of the 

is prov 

the dev 

s (zer 

the Stat 

dard way 

tar. In 

ce. As 

ling lei 

ine the 

i s iraoe 

As zer 

characte 



are u 
E dev 

devic 
ided a 
ice ad 
c). 
us of 

by wh 

order 
a CP/M 
NP to 
status 
. lEI 
OS are 
can 



sed to 

ce attached to the 

e is spec! f i ed in 

t present to a 1 1 ow a 

dress. Thus the device 



the input device, 
ich an IEEE device 

to deterajine this, one 

transient can cal I 
read a chart and lEINSTAT 
» the character read has to 
NSTAT reads the device 

used to indicate 
not be read fro.m the 



0040 
005F 
0020 
003F 



ie<-talk equ 
ie<-utlk equ 
ie*lstn equ 
ie«-ulstn equ 



IEEE control codes 



40h 
5fh 
20h 
3fh 



Jmake talker 

Smake untalk 

;make I istener 

tmake un ! i sten 



EAF6 00 
EAF7 00 



ie*adrs db 
ie«-char db 



rout i nes 



Jdevice address lean be moved to 

IBMRAH) 

5le inp char buffer 



EAF8 




IEINSTAT: proc 




EAF8 


3AF7EA 






Ida 


i eschar 


EAF3 


87 






ora 


a 


EAFC 


CA02E8 






Jz 


i e i 1 


EAFF 


F6FF 






or i 


Offh 


EBOl 


C9 






ret 




EB02 




iei 


lO: 






EB02 


3AF6EA 






Ida 


i e«-adr s 


EB05 


C640 






adi 


ie*talk 


EB07 


4F 






niov 


c> a 


EB03 


1E48 






Idk 


e» 1 owC iebSc) 



IEINSTAT 

gats status of the input device attached to ieee port 

if a char is present in ie<-char then 

return with true status 
else 

make device talker 

read the device 

if char read then 
store in bfr 

endi f 

make untalk 

return with status of buffer 
endi f 



;if char present then 

;return with true status 

Sendif 

.make talker 

Sget primary address 



9 

■a 
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;output interface message 

;try again i f error 

«**secondary address output may be added here*** 

;read a char« 



E60A 


CD68Ee> 


cal 1 


romcdl 


EBOO 


B7 


or a 


a 


EBOE 


20F2 •EB02* 


jrnz 


ieilO 



EBIO iei20: 

EBIO 1E51 

E9X2 CD68E6 

E815 CB7D $ 

EB17 2801 »EB1A$ 

EB19 AF 

E61A iei30: 

E81A 32F7EA 



iei40: 



ESID 




EBIO 


0E5F 


EBIF 


1E43 


E621 


CD58E6 


£824 


B7 


EB25 


20F6 *EB1CS 


EB27 


3AF7EA 


EB2A 


B7 


EB2B 


C8 


EB2C 


F5FF 


EB2E 


C9 



Idk 


e< low( i eb7c> 




call 


roracdl 




bit 


7,1 




Jrz 


iei30 




xra 


a 




sta 


ie«-char 






;make 


unta Ik 


mvj 


Cf ie«-utl k 




Idk 


e> 1 oM< i eb5c) 




call 


romcdl 




or a 


a 




Jrnz 


iei40 





return with status of the char 

Ida ie*char 

or a a 

rz 

or i Offh 

ret 



; i f error then 

tinicate no char recvd 

;stor the char 



routines 



lEINP 

Reads a character from IEEE port 



EB2F 
EB2F 
E832 
EB34 
ES37 
EB33 
EB3A 



lEINP: 



C3F8EA 

28FB ''EB2Ft 

21F7EA 

7E 

3600 

C9 



pr oc 

cal I 

jrz 

Idk 

Id 

sto 

ret 



ie instat 

i e inp 

hi » i e«-char 

a.thlJ 

O.Chll 



;Mai t till char avai I 



Jclear the buffer 



** 

routine: 



EB33 




lEOUT: 


proc 




E838 


C5 




push 


be 


EB3C 




ieoOS: 






EB3C 


3AF6EA 




Ida 


i3<-adrs 


EB3F 


C620 




adi 


ie«-l stn 


EB41 


4F 




roov 


c< a 


EB42 


1E43 




Idk 


e.lowl iebSc) 


EB44 


C068Ea 




call 


romcdl 


E847 


87 




ora 


a 


E348 


20F2 *EB3C$ 




jrnz 


ieo05 



leouT 

Outputs the character in reg C to IEEE port 
Uses ROn resident primitives. 



• save the char 
;make I i stener 



igat primary address 

joutput interface message 
;try again if error 



o 



e 



O 

O 

3 
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: ***secondary address output may be added here*** 

;do not send eoi 



EB4A 






ieo2C: 






EB4A 


0600 






mv i 


btO 


E54C 


CI 








1- 










HWj^ 


(J 


EB«D 






ieo22: 






EB40 


C5 






push 


b 


EB4t 


1E4E 






Idk 


e» 1 owt 1 eb6c) 


EB50 


CD68E6 






call 


romcdl 


E853 


CI 






pop 


b 


EB54 


87 






or a 


a 


E355 


20F6 » 


E340J 


• 


jrnz 


ieo22 


EB57 






ieo40: 






EB57 


0E3F 






nivi 


c. ie<-ul stn 


EB59 


lE4a 






Idk 


e» 1 owt i ebSc ) 


EB58 


CD68E6 






call 


roiTiCdl 


EB5E 


87 






or a 


a 


EE5F 


2 0F6 * 


EB57t 




Jrnz 


ieo40 


EB61 


C9 






ret 





Jsave char again In case of retry 



;try again i f er ror 
;r!iaKe unlisten 



9 

I 
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a 
O 

o 

3 



O 
o 



The Parallel port is actually the IEEE port driven with the Centronix 

protocol. The bit ass ignements of tha PIA and PI3 are as foitows: 

PIAO-7 = data bus 

PIBO = 0. data bus is output. 1» data bus is input 

Pjai = set to 1. 

PI52 = set to 0. 

PIB3 = outputt 1 Input 

PIS4 = not used 

PIB5 = output strobe. Active = 1. 

PIB6 = 0. printer busy. It printer is ready. 

PIBT = not used. 

CA2 = going low indicates to device that we are busy. 
CAl = low to high transition gates input data to port a. 

The port is bi ai ract iona I but only one direction 
can be active at any time. The direction of port is determined 
by which routines are called. If postat or parout are 
calledi it is made an output port and an input port if 
pistat or parinp are called. 



port registers 



= 


29C0 


pa.dta 


egu 


h. ieee+0 


= 


2900 


pa.dir 


equ 


pa.dta 


= 


2901 


pa.ctl 


equ 


h. ieee + 1 


= 


2902 


pb.dta 


equ 


h. ieee+2 


= 


2902 


pb.di r 


equ 


pb.dta 


~ 


29 03 


pb.cti 


equ 


h. ieee+3 






» 


port 


ctl register 


- 


002A 


pa.cdr 


equ 


00101010b 


= 


002E 


pa. cot 


equ 


00101110b 


= 


0000 


pb.cdr 


equ 


OOOOCOOOb 


= 


0004 


pb.cdt 


equ 


OOOOOlCOb 






; 


direction registe 


= 


OOFF 


pa.dro 


equ 


Of fh 


= 


0000 


pa.dr i 


equ 


COh 


= 


ODBF 


pb.dr 


equ 


Obfh 


= 


0002 


pb.dto 


equ 


OOOOODlQb 


= 


0008 


pb.dti 


equ 


OOOOlOllb 


= 


004D 


pp.ordy 


equ 


OlOOOOOOt 


= 


0080 


pp. irdy 


equ 


lOOOOOOOb 


= 


002 


strb 


equ 


OQlOOOOOb 






: 


port 


modes 


:= 


0000 


pp.unde 


f equ 





= 


0001 


pp. out 


equ 


1 


= 


0002 


pp. in 


equ 


2 


£362 00 


pp. mode 


db 


pp.undef 






;*** 










; sbrt: 




CV20P. 


E353 




s 

cv2op: 


pr OD 




£663 3A62E3 




Ida 


DP.Tode 



:to address port a direction 

;to address port a data and set 

;port a in input progran handshake mode. 

;to address port b direction 

;to adaress port b data 



Sport a output mode 

Joort a input mode 

;oor t b di rect ion 

iport b data for output 

Sport b data for input 

;output rdy tit in pib 
;tnput rdy bit in pia ctl 

;strobe bit in port b 



initializes the port to a parallel output 
port. 



a 

O 

o 

3 



-D 
O 

o 
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cp i pp. out 

•"Z ;retiirn when in output jiode 

set port a to output an ai i lines 
l<< atpa.cdr 

Jselect direction reg 



E866 


FEOl 


E863 


ca 


tB69 


3E2A 


E86a 


320129 


tS6£ 


3tFF 


E870 


320029 



E873 

EB75 

EB73 
EB7A 
EB70 
EB7F 

£682 
EB84 
EB87 
EB89 

EBS: 
EB8E 
EB91 



3E2E 
320129 

3E0O 
320329 
3EBF 
320229 

3E04 
320329 
3E02 
320229 

3E01 

3262E8 

C9 



EB92 




EB92 


3A62ES 


E895 


FE02 


EB97 


ca 


EB98 


3E2A 


EB9A 


320129 


EB9D 


3E00 


ES9F 


32 0029 


E8A2 


3E2E 


EBA'^ 


320129 


EBA7 


3E00 


EBA9 


320329 


EBAC 


3EBF 


EBAE 


320229 


EBBl 


3E04 


EBB3 


320329 


EBB6 


3E0B 


EBBS 


320229 


EBBS 


3E02 


EBBD 


3262EB 


ESCO 


C9 



sbrt! 



cv2i p: 



sta 


pa.ct 1 


Ik 


atpa.dro 


sta 


pa.di r 


Ik 


atpa.cdt 


sta 


pa.cti 


Ik 


atpb.cdr 


sta 


pb.cti 


Ik 


a.pb.dr 


sta 


pb-dir 


Ik 


a»pb.cdt 


sta 


pb.cti 


Ik 


atpb.dto 


sta 


pb.dta 


Ik 


a.pp.out 


sta 


PD.mode 


ret 






CV2IP. 


proc 




Ida 


pp. mode 


cpi 


pp. in 


rz 




set 


port a to in 


Ik 


atpa.cdr 


sta 


pa.cti 


Ik 


atpa.dr i 


sta 


pa.di r 


Ik 


a»pa.cdt 


sta 


pa.cti 


Ik 


a» pb.cdr 


sta 


pb.cti 


Ik 


at pb.dr 


sta 


pb.dir 


Ik 


a? pb.cdt 


sta 


pb.cti 


Ik 


aipb.dti 


sta 


pb.dta 


Ik 


a»pp.i n 


sta 


pp. mode 


ret 





;output constant to dip. reg to put 
a port in output raode 

;select port a data reg. 



;seleot port b direction 

Sail lines are output except the output 
;busy si gnal on bi t 6 



;select data register 
;initialize port b data 



initializes the port to a parallel input 
port. 



Jreturn when in input raode 



•select direction reg 

joutput constant to dir. reg to put 

a port in input mode 

;select port a data reg. 



Sselect port b direction 

tall lines are output exceot the output 
Jbusy si gnal on bi t 6 

Jselect data register 

^initialize port b data 



routine: POSTAT 

gets status of the parallel (Centronix) printer 
attached to the ieee port 



SDRCI1 a03x Asseirbler var 
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O 

o 

3 

■D 



EBCl 




POSTAT: 


or oc 




E3C1 


CDIEEC 




call 


3w2rom 


ESC4 


CD63EB 




call 


CV20P 


EBC7 


3A0229 




Ida 


pb.dta 


E8CA 


E540 




an i 


PD«orciy 


EBCC 


2802 »ESDO$ 




jrz 


poslO 


EBCE 


F6FF 




or i 


true 


EBDO 




poslO: 






EBOO 


C32CEC 




Jnip 


sw2ram 



rout i ne: 



Sconvert to output 
iget port b data 



PISTAT 

gets status of the input device attached to the 

para I 1 el port 



EB03 


00 


piacti 


do 





EB04 




PISTAT: 


proc 




EBO<F 


CDIEEC 




call 


SM2rom 


EB07 


CD92EB 




ca 1 1 


cv2i p 


EBOA 


3AD3E3 




Ida 


piactI 


EBOD 


E680 




an i 


pp. i rdy 


EBOF 


200A *EBE3$ 




jrnz 


pis20 


EBEl 


3A0129 




Ida 


pa.cti 


EBE* 


32D3ES 




sta 


pi acti 


EBE7 


E680 




ani 


pp.i rdy 


EBE9 


2802 *EBEOt 




jrz 


pis30 


EBE3 




pis20: 






ESEB 


F6FF 




or i 


true 


EBED 




pis3C: 






EBEO 


C32CEC 




jmp 


SH2ram 



;if saved status indicates there is a char 
;in the PI A 

Sthis is saved as reading the 
;oia clears the status 







; rout 


ine: 


PARINP 
inputs 


EBFO 




PARINP 


: proc 




EBFO 


CDD4EB 




call 


pi Stat 


ESF3 


28FB *£3F0t 




Jrz 


pari np 


EBF5 


CDIEEC 




call 


sw2ro(ii 


EBFB 


AF 




xra 


a 


EBF9 


32D3ES 




sta 


pi act 1 


EBFC 


3A0029 




Ida 


pa.dta 


EBFF 


2F 




cma 




ECOO 


4F 




mov 


c»a 


ECOl 


C32CEC 




jmp 


swZrani 



inputs a character froir parallel port. 



fWait till char in pia 



;clear saved status 



sinvert data 
; a I s in c 



routine 



EC 04 

EC04 CDCIEB 

EC07 23FB *EC04S 



PAROUT: 



proc 
ca 1 1 
jrz 



PAROUT 

outputs the character in 

port as a parallel port. 

postat 
parout 



c to the IEEE port treating the 



Gsborne CP/", 2,2 



ECO? 


CClEcC 


ECOC 


79 


EC 00 


2f 


tCOi 


32002^ 


ECU 


3E22 


eC13 


320229 


eci6 


3E02 


£C13 


320229 


EC13 


C32CEC 



SORCIi'l S03x 


Asssirblar var 


CEICS. 




call 


sw2r om 


(T.OV 


aiC 


c-a 




s+a 


pa.dta 


Ik 


zt po.dto+strb 


sta 


pb.dta 


Ik 


a» pb.dto 


sta 


Pft.rJt a 


j.np 


SH2ra-n 
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; 1 nver t data 

;3et strobs 
;cl8£r strooe 



o 



o 
o 



o 

o 







SORCI 


•* S03x Asseirbler ver 3.5 = 


Osbor 


ne CP/^■ 2.2 CBICS. 










; sbrt! 




SW2RC" 

sw i tches to rom 

saves all regi stars 


EC1 = 




SW2R0M: 


croc 




ECU 






di 




ECIH 


+F3 




06 


0F3h 


tClF 


F5 




push 


af 


ECZO 






enarom 




EC20 


+ 




01 




EC20 


+F3 




D3 


0F3h 


EC21 


+ 0300 




OUT 


C 


EC23 


+ 3EO0 




LOK 


A.C 


EC25 


+3203EF 




STO 


A,R3f«RA.« 


EC23 


+ 




El 




EC2e 


+F5 




03 


0F5h 


EC29 


Fl 




pop 


af 


EC2A 






ei 




EC2A 


+ FB 




CB 


CF3h 


EC28 


C9 




ret 





<:/55/7= 



3<j:92 Paje 'fC 
5:':!CCBIC33.A3t' 



EC2C 




EC2C 




EC2C 


tF3 


EC2D 


F5 


EC25 




EC2t 


+- 


EC2E 


<-F3 


EC2F 


+ 0301 


EC31 


+ 3E01 


EC33 


+3208EF 


EC36 


4- 


eC36 


+F3 


EC37 


Fl 


EC33 




EC38 


+ F3 


EC39 


C9 




= eC3A 




= 0000 



EC3A 
EC70 



= EC 70 
OOCF 



sbrt: 



SW2RA»1 

switches to ram 
praserves all registers 



SW2RAH: 


pro: 
di 






D3 


0F3h 




push 


af 




Ji sroT 






CI 






D8 


0F3h 




OUT 


1 




LDK 


A,l 




SIC 


A,RDWiM 




EI 






OB 


DFBh 




pop 


af 




ei 






03 


0F3h 




ret 




XXX5 


= 


* 




if 


xxx>»«RA>1EX 


.9 


error 
enai f 


CCD£ TCO LARGE.. 




CRG 


EIOS+770H 




OH 


CC? 



;This is location E070h in 60K systeir 
;This location needed by RCM for 
:relocating boot loader 
;last sector read bonnbs out part 
;of syiRAH in 60< systeir 



;QCCRAM2.AS'^ 
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eC72 
£070 



E070 
0002 



Fi~i77 = f\f\rt(. 



ij- c v I q T 



Used to asseirsly ^CV residant ana C31QS 



ccpaar: D3 



T • nc- 



ysA«PXT 
2 



.-LEN*KLE*l 



;Tfii3 location is assigned in eiCS 
Sann filled in Dy loader in ROf 



L - * U L ^ 



a 
O 
o 

3 



ED73 



E080 

EDSO 



EDea 



= 0180 



HSTBLiF: 



^ost disk xfer Suffer ana... 

Format track te.nplate holding bjfer 

SS 256+12B 



= EE80 



DIRSU'^: 



Directory Buffer 

HST3UF + 255 



£FO0 


= 


0006 




= 


EFOl 




s: 


£F02 




= 


ErC* 




= 


EF05 


EF06 


= 


0001 


EF07 


= 


0001 


f.FOS 


= 


0001 


EF09 


= 


0006 


EFOF 


_ 


0002 


EFll 


= 


0002 



t;h 


CS 


RNDV 


= 


ERCNT 


= 


RTRC 


= 


RTRY 


= 


^*PCHR 


OS 


ECHOP 


CS 


RQMRAM 


DS 


OSTSS 


DS 


• 


Oi 


OMAOR 


D3 


D.'^AAOi^ 


DS 



6 

T=W<-1 :rando(ri njrrber seed 
RNDv+i ;dw ercnt 

ES.C\T+2 ;retry count 
PTRC+1 



oromot character 
=0, I ist ehco off 
0= PAW., 1= ROC 
Disk status tytas 



Disk operation teT.ps and control 

2 ;&ddress for read/write Disk 

2 ;CEIOS, users C^A 



EF13 



00 01 



Note order of xxxSEC .xxxT'^K t xxxDSK must ba iiaintainso 
along with length {lt2.1). 



EF14 


= 


0001 


EF15 


~ 


0002 


EF17 


- 


0001 




- 


EF14 




= 


EF15 




= 


EF17 


tF13 


- 


OOCl 


EF19 


= 


0002 


EFIS 


= 


OOCl 


EFIC 


= 


0001 


EFIO 


= 


0002 


EFIF 


- 


0001 


EF20 


- 


OOCl 


EF21 


= 


OOOL 


eF22 


— 


0031 


EF23 


= 


0001 


EF24 


■:s 


00 oc 


cF30 


= 


00 20 



SEKDEL: 


OS 


SAVSEC 


2S 


SSVTRK 


OS 


SDISK 


DS 


ACTSEC 


^ 


ACTTRK 


= 


ACTOSK 


= 


SEKSEC 


OS 


SEKTRK 


OS 


SEKOSK 


OS 


HSTScC 


DS 


HSTTRK 


CS 


riSTDSK 


OS 


TEMSEC 


DS 


ROFLAG 


DS 


clFLAG 


DS 


'WRTVPE 


CS 


ALV: 


OS 


CSV: 


OS 



1 
1 
1 

SAVSEC 
Si VTRK 
SOISK 

1 

2 
1 

1 

2 
1 

1 
1 

1 



ALVS 
CSVS 



;$eT; for seei^-r astore command in RCf: 
Jdepends on disk tyoe. Siemens = 3h» MP! = Oh 
;la3t sector requested 
Slast track requested 
SSelectea disk drive (Oil) 



;usad in bios only 
;Read flag 
iError reoortirj 
;«rit9 operation type 



£F5j 


= 


0001 


fcF5l 


= 


0001 


EF52 


= 


0001 


£F53 


= 


3002 


F.'^SS 


=- 


0001 


cF56 


- 


0001 


eF57 


. 


0002 


EF59 


= 


0001 


EF54 


^ 


0002 


EF5C 


_ 


0001 


EF5D 


= 


OOCl 


EFSe 


= 


0001 


EF5F 


= 


0001 


EFbO 


= 


QOOl 
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; 3I0S bl QCk ing-ciebl ccki ng flags 

HSTACT: DS 1 ;host active flag 

HSTWRT! DS 1 ;Hcst ur itten flag 

UMACNT: DS 1 rjnalloc rec coLint 

U^ATRK: DS 2 ;TracK 

UNASEC: OS 1 SSector 

LOGSeC: DS 1 ;Logical sector 

LOftDR OS 2 

XEYLCK DS 1 ;2ero if lockeo keyboaro 

CURS OS 2 :current cursor cosition 

; Kevboarl sc>iir. t9iiioor ar i ?s 

TKEY OS 1 ;Te.ii holding key 

HKCMT DS 1 me'oouncs key 

LKEY OS 1 ;Last valid keystroke 

CKEY DS 1 :Last control key 

tSCH DS 1 ;£SC holoing flag 

;?IAAD ana PIA30 nust be kept sequential. PIAAC first 

Jdepenaency in VC.«-HQ!1c of P^KEY.asir 

EF61 = 0001 PIAAD: OS 1 JHolds last PIA-A Cata 

tF62 = 0001 FIA3D: OS 1 :rtcl-Js last PIA-l cata 

; Calendar nonth, day year 

EF63 = 00C3 lOAY DS Z 

- EF64 I^ICMH = IDAY + 1 

= EF6S lYR = IOAY+2 

; Wall c!oc< tine calls anc disk active 

; see U^'TIx: in 3MKEY-asm 

EF6& = 0006 HOli^^S: DS 6 

HCUvlS+1 

HOURS* 2 

= HQuOStS 

Used to r!3sel9Ct drive when there is 'JD activity 
on drive for n seconds. Sea rC5.< routine 
HGUJ?S+4 ;=0 oy i=OSK, Used by UPTI"! 

HDiJRS+5 ;*G tell timer cell 

t.fhZ - 0001 LLIMIT ES 1 ;^ax -Scolunins in a logical line 

'.LIMIT = ".LLI/iT.'h. • 

; Otsk drive current positions 

tF6D = O0C2 LOS^L: OS 2 JLast selected drive 

= EF6E LDTRK = LPSEL+l :La3t track used for non-selected arive 

eF6F = 000? IESTK: 05 2 ;save current stk ptr 

: InterruDt stack 

EFTl = 002S OS 20*2 

EF99 ' 0000 ISTK: 03 C 

; Stack entry 



0006 


HOU^^S 


EF6T 


MIKS: 


EF68 


sees: 


EF69 


SSC6: 



EF6A 


DACTVE: 


= 


EF6E 


3ELCKT: 


= 


0001 


LLIMIT 


ES 

MS 



SORCT"! S03x Asssirblsr var 3.5E <:/55/l= 59:92 Page 43 



2bjg Coniior ?,t.* Storaqe. 



:0CCaAh«2 .ASM 



Epq? 


= 


0023 




OS 


20'-=2 


EFCl 






3I0STK: 






£FC1 


= 


00 00 


RGKSTK: 


OS 





EFCl 


= 


0031 


ACIAO: 


DS 


1 


£FC2 


:r 


000* 


Jii79x: 


05 


4 


EFC6 


= 


OCOl 


K3DLY: 


OS 


1 



;ia3t cosrraand tyta .written to ACIA 

:i79x register save area 
Skey'csarc detouncs-del ay cell 



o 

o 

3 



O 

o 



-QJ = 0001 



since CP/M CANMCT boat off °: » this cell is used 
to invert the naiias of the ? drives! 
=0» all normal » A=A:t 3=3: 
=1. all inverted. A=3:5 B=A: 
OSKSW? DS 1 



EFC3 






eFC3 


+ = 


0003 


EFOO 






EFOO 


= 


0002 


eF02 


= 


0002 


EF04 


= 


0002 


EFD6 


= 


0002 


EFOR 


= 


0002 


EFOA 


= 


0002 


EPOC 


= 


0002 



230 Alternate Register Set 

ALIGN lOh 

OS (*+(10H)-l)/(10H>*tlCH)- 



RAGS: 




OFSAX: 


DS 


BCSAX: 


OS 


AFSAX: 


CS 


hLSAX: 


DS 


IXSAX: 


DS 


lYSAX: 


DS 


IVSAX: 


OS 



;0E- 
;sc- 
;4F' 
;hl- 

nx 
:!Y 

:ir^terf 



oage register 



EFDE 






EFDE 


+ = 


0002 


EFEO 






FFEO 


= 


0001 


EFtl 


: 


OCOl 


EFE2 


= 


oaoi 


EFE3 


= 


0001 


EFE* 


= 


0001 


EF£5 


= 


OCOl 


EFE6 


~ 


0301 


EFE7 


= 


0001 


EFE3 


= 


0OC2 


EFE4 


= 


0002 


EFEC 


s 


000 2 


EFEE 


= 


OOCl 



EFEF = 0001 



8080 Seaister Save Area. 

ALIGN lOh 

"5 (*+(inh)-l)/(10H)*(lCH)-s 



REGS: 




ESAVE: 


DS 


OSAVE: 


DS 


CSAVE: 


DS 


3SAVE: 


DS 


FSAVE: 


DS 


ASAVE: 


DS 


LSAVE: 


03 


HSAvE: 


DS 


PSAVE: 


DS 


SSAVE: 


DS 


3KPA: 


OS 


3KPC: 


DS 


V^T3Fi= 


03 



\z Register save location 

;D l^egister save location 

;C Register save location 

:3 Register save location 

;'=LAGS save location 

;A Segi'ster save location 

;l Segister save location 

tH register save location 

:?G>« CCUNTER save loca,tion 

;iJSER STACK pointer save location 

;ls3t breakpoint address 
JContents of bko 

;last Vertical offset taken frcm ccut 



Interrupt Jjrr.3 Vector is between EFFSf EFFF. 



no tS^.'jRs. 517 Lacelst sAD'^h oytes not used. 



Program LWA - EFFOh. 



SOi?CIH 303x Asserrbler ver 
Csborne t? / :^ 1.1 C3ICS. 



3.5: 



<:/55/7= 59! 



9<! Page ^^t 



O 
o 



n ACIAD 
ACICTL 
aCISTA 
ACK 

a:tdsk 

ACTSEC 
ACTTRK 
n 4FSAX 
AHSCRL 
AHSENB 

3 ALIGN 
4LV 

3 ALVS 
ALVSZ 

n ASAVE 
1 3ASVL0 

3CCP 

3CPM 
n iCSAX 

?oas 

n 3ELCNT 
3IDS 
B13STK 

n 8K,PA 

n SKPC 
8RATE 

n eSAVE 
CAUTD 
CAUT3L 

s ceiosv 
:boot 
;cp 

n CCPAOR 
s CDISK 
n CKSY 

:n!n 

:nout 

:nsta 

CNTRLO 
CNTRLl 
CNTRL2 
CNTRL3 
CNTRL4 

:ntrl5 

CNTRL6 
CNTRL7 
CNTRL8 
CNTRL9 
;ONIN 

colour 

CONST 
CCI^STS 
COUNT 
s CR 

CRSTAT 
CRTIO 



OFAO 

EFCl 

EACH 

EAD9 

0006 

E5S9 

EF17 

EF14 

EF15 

EFD4 

EAOF 

E568 

mac 

eF24 

oooc 
oocc 

EFE5 
0080 
E743 
E73A 
EFD2 
0706 
EF6a 
E5C0 
EFCl 
EFEC 
EFEE 
E569 
EFE3 
E58A 
0007 
0001 
E70C 
CFOO 

E070 
0304 
EF5F 
£910 
E915 
E90B 
E592 
E593 
E594 
E595 
E595 
E597 
£593 
£599 
E59A 
E59B 
E5C9 
E30C 
t9Al 
E9AD 

e^c2 

OOOD 
E9F3 
EAOA 



43# 5 

5/4^ 

5/47 

31<« 5 

6#Z4 

19/48 

19/54 

19/51 

43<»23 

27/16 

6# 4 

43/19 

7/23 

8/ 2 

4#12 

8/ 2 

43#40 

27# 9 

15/ 3 

15« 9 

43#22 

3#15 

42*42 

3*14 

10/24 

43«46 

43«47 

6* 5 

43«38 

6#2S 

6/23 

16/11 

5/10 

3«13 

15/54 

41« 4 

11/49 

42#18 

5/13 

6/14 

5/12 

6/ 8 

6/ 9 

6/10 

6/11 

6/12 

6/13 

6/14 

6/15 

6/16 

6/17 

5#13 

5*14 

24/45 

26/13 

26/16 

16/ S 

25/ 2 

2S/26 



31*46 
3 0/ 5 
31/22 
15/43 

20/10 

2e/i4 

20/12 

23#51 
28/30 
43/33 

7/41 
41/53 

7/23 



15»16 
15/13 



15/36 



5/ B 

43* 2 



14/57 



6/31 

6.«31 



11/52 

22S37 

22#44 

22»31 

6ff33 

6*34 

6S135 

6*36 

6S37 

6#33 

6#39 

6S40 

6*41 

6*42 

27/23 

21/29 

26»14 

26#24 

27/17 

16/11 

2 3* 9 

2 8/29 



30/15 



41#43 
20/33 
41*42 



28/32 



41#53 



7/31 



32*14 



41S41 



28/52 



7*31 



7/41 



7/44 



7S44 



6/54 



15/40 



15/34 



40/49 



14*39 

3/14 3/15 

16/22 40/50 



14/50 



14/51 



16/24 



15/ 6 



15/10 



15/28 



2 8/47 



27*23 



23*35 



2 7/50 



SQRCI»< SCax Assembler ver 3.5E <:/55/l= 59:9' Page 45 
O "^''"'"^ "'^ 2-^ "1°^- E:0CCRA^2 .ASM 



o 



CRTOUT E9F6 24/57 25/ 7 28#2' 
n CSAVE EFE2 43*37 



** X ?? D ■* 



5 '■'^U CPin -jf-t-y It, 

" ^.-r« t f £. t 1 r '^ 

* s CSVS 0020 41/59 

S :S¥SZ 0020 4#13 7/27 7/33 7#30 7/40 7/43 7S43 

_ CUS'hCT E6E3 12*25 13/12 

g. CUIIS EF5A 26/56 42*12 

o CV2IP EB92 37»28 38/21 

i CV20P E363 36#59 3 8/ 3 

1 OACTVE EF6A 42*40 

1 s 08UF 0080 15/19 
^ n DESAX EFDO 43#21 

S 3D 31 nac 9/21 10/21 10/29 10/39 10/43 14/43 40/ 7 

40/11 40/23 40/32 
R OneuF EEBO 7/25 7/33 41#17 
S n OIROH 0001 3*46 

1 5ISPCH E930 22/49 22/56 23/ 3 23/10 23/34 23#38 
o s JISRDH mac 10/42 14/42 40/31 

OISSTK £979 24/12 24#39 

3 DHA 0080 

3I«AADR EFll 12/53 19/23 41#3i 

OMADR EFOF 15/22 41*30 

30ME E7aC 15/50 15/53 16*13 

30»JeO E7C7 16/16 16«19 

30.ME1 E7CA 15/59 16#21 

DOWN E59E 6/20 6#45 

3PBASE E614 7«19 11/33 

OPBGEN mac 4#50 7/54 

3PBS1 E634 7/26 7/39 7#S1 

3PHGEN mac 4iS16 7/21 7/34 

n OSAVE EFEl 43#36 

OSKSl 0000 3#30 7/54 

n DSKSWP EFC7 43#14 

3SPCH1 E94F 24i!»17 24/19 

OSPRET E960 24/29 24#33 

n 0STS8 EF09 41#27 

n iCHQP EF07 41#25 

EFESC 0008 28#19 26/24 

EFGR 0001 28#20 28/24 

30 EI mac 9/28 9/46 10/34 10/43 10/53 10/57 14/43 

40/16 40/19 4C/37 40/43 

3 ENAROH mac 10/28 40/10 

n ENRQM 0000 3#45 

E0T3L E5A0 6/22 6« 47 

ERCNT EF02 41#21 41/22 

ERFLAG EF22 17/16 18/16 18/23 20/41 20/48 21/ 5 41#55 

n ESAVE EFEO 43*35 "tisa:; 

s ESC 0019 29/53 

ESCH EF60 15/26 28/23 42S19 

ESCS3 EASE 29/32 29#53 

ETX 0003 31« 4 31/17 

3 FALSE 0000 

3 FC3 C05C 

FILL £846 17/11 18/ 9 19#11 

FILL3 E35C 19/17 19S19 

FILL4 c37A 1?#36 19/41 

FILLS E8S3 19/33 19«44 

FILL6 E886 19/32 19S46 

FINAL E3C6 19/60 20«21 

FLUSH E8AA 11/ 3 18/22 19/44 2C# 3 



SDRCl"^ =iO?x Asseirbler var 3.5=; <:/?5/7= 59:J2 "age 45 
Usborn^ CP/M 2.2 CBiaS. E:0CC^AK2 .ASf 



■a 


n 


■^MTJ 


tf 39 


5»31 








5- 




FNLl 


E3D6 


20#36 


20/45 






3- 




rPVSIo 


0010 


3#24 


3/32 






« 


n 


^SAVt 


EFE4 


43#39 








<o 


s 


= WAVX 


F300 










U 




30DISP 


£918 


22/33 


22/39 


22«45 




i 




lC:^Of« 


£69A 


10/37 


10«56 






o 


s 


H . I E E E 


29 00 


36/24 


36/26 


36/27 


36/29 


3 


s 


H.SCTR 


2A0O 


31/49 








o 


3 


H.3I0 


2A00 










o 

3 


5 


^.SR-C 


2AC1 


30/36 










S 


H.SSTS 


2A0O 


32/21 








3 


H.SXMT 


2AC1 


30/55 








O 


S 


H.VJT 


2C00 


32/ 7 








O 


n 


-IKCNT 


EF5D 


42*16 








E 


n 


HLSAX 


EFD6 


43l»24 








s 




•40ME 


E69'= 


5/18 


UK 7 


15/ 7 




o 




HOURS 


EF66 


42*33 


42/34 


42/35 


42/3b 




n 


^SAVE 


EFE7 


43«42 












HSTACT 


EF50 


11/10 


17/20 


19/2!! 


42rf 2 






HST3UF 


ED80 


15/21 


19/12 


41»13 


41/ir 






HSTDSK 


EFIF 


19/47 


20/ 9 


iisisi 








^STSEC 


EFIC 


19/33 


19/53 


20/13 


41*49 




n 


HSTSIZ 


0100 


3*23 












HSTTRK 


EFIO 


19/50 


20/11 


41*51 








NSTWRT 


EF51 


lB/15 


2 0/ 4 


42IS 3 








IDAY 


EF63 


15/33 


42*27 


42/23 


42/29 






!£4DRS 


EAF6 


33#29 


33/57 


34/53 






n 


lESlC 


E55r 


5S35 










n 


IE32C 


£542 


5«35 










n 


ie*3C 


E*;*? 


5#37 










n 


It34C 


F548 


5*33 












IE85: 


E34B 


Si's? 


5 3/60 


34/19 


34/55 






IE36C 


E54E 


5^40 


35/ 8 










IE37: 


£551 


5#41 


34/ 3 








n 


IES8C 


E554 


5*42 












lECHAR 


tAF7 


33*31 


33/50 


34/14 


34/25 






lEIlO 


E302 


33/52 


33«55 


3 4/3 






n 


IEI20 


E310 


34# 7 












IEI30 


EEIA 


34/11 


341S13 










IEI40 


E31D 


34«17 


3 4/22 










lEIN? 


Efi2F 


24/54 


34*35 


34/37 








!cIf.ST 


EAF8 


24/43 


33S49 


3 4/36 








lELSTNi 


0020 


33«25 


34/54 










IE1C5 


E33C 


34#52 


34/59 








n 


ItDZO 


F34A 


35*, 3 












ieG22 


E3 4D 


35* S 


35/12 










I £040 


£3 57 


35«15 


3 5/20 










leaSTA 


E9F3 


25/ 5 


2 3^ 3 










lE'lUT 


£333 


24/60 


25/10 


34s49 








I?:STK 


eF6F 


9/44 


42*52 










lETALK 


0040 


33«23 


3 3/53 










lEULST 


0031= 


3 3* 2b 


35/16 










lEUTLK 


005F 


33*24 


34/1" 








n 


JV.JNTH 


EF64 


42#23 












I03ITE 


E566 


5^53 


14/5=5 








s 


ic;yt6 


0003 


14/56 


2 4/16 








n 


ISTK 


EF99 


42S57 










n 


IVSAX 


EFDC 


43*23 










n 


IXSAX 


EFD8 


43«26 









42/40 42/42 



35/17 



34/33 



o 

o 



<o 

OD 
AS 

O 
a 



O 

o 

3 



SG^CI''^ 3C3x issen-bler ver 
Osborne CP/M 2.2 CSICS. 
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n 


lYR 


EF65 


42iS29 








n 


lYSAX 


EF04 


43#27 








n 


^.BJLY 


eFC5 


■»3# -3 










<eYINP 


E962 


24/51 


27*12 


27/51 




n 


<EYLCK. 


EF5<5 


42i»U 








n 


<EYLST 


£072 


41« 6 










■CINIO 


E9C5 


27/20 


27*27 






s 


KLELtN 


0002 


41/ 6 








s 


KtLEN 


0033 


41/ 6 








n 


LOADS 


Er57 


42»10 










lOSEL 


EF60 


42#49 


42/50 






n 


LOTRK 


EF6t 


42*50 










LEFT 


E59F 


6/21 


6*46 






s 


LF 


OOOA 


16/ 8 


16/11 






n 


LIST 


E50F 


5«15 








n 


LISTST 


E52D 


5#25 










LKEY 


EF5E 


26/21 


42*17 








.11 KIT 


EF6C 


14/61 


42*45 








LOGSEC 


EF56 


13/14 


17/43 


42* 7 




n 


LS4VE 


EFE6 


43«41 










LSI 


E91D 


5/15 


22*53 








LSTST 


F935 


5/25 


23*30 






s 


LVMEM 


1000 










s 


LW4MEM 


FFFF 


3/19 








n 


>1INS 


EF67 


42*34 








n 


•IPChR 


EF06 


411*24 








s 


«R4M 


ED80 


41/ 9 








s 


HRA«EX 


ED70 


40/44 


41/ 3 








MRTRY 


0005 


3S10 


2C/35 






s 


MSEC 


OOOA 


7/10 


7/55 








^SIZE 


003C 


3#11 


16/ 3 


16/ 3 






HIVINFO 


ESF2 


17/ 3 


17/39 


21* 3 






NOSK 


0002 


4fl0 


7/21 


7*21 


7/34 7*34 




NOFDD 


0002 


4#11 


7/29 


7*29 


7/42 7*42 




tJOKEY 


OOOD 


26il2 


26/22 






s 


NVDL 


0013 












3RMASK 


0020 


32# 9 


3 2/19 


32/22 






OUTCH 


EAOA 


28«46 


2 9/46 








PA.CDR 


002A 


36*32 


37/ 4 


37/33 






PA.CDT 


002F 


36*33 


37/ 9 


37/38 






PA.CTL 


2901 


36#26 


3 7/5 


3 7/10 


37/34 37/39 




PA.DIR 


29 00 


36#25 


37/ T 


3 7/36 






PA.ORI 


0000 


36*40 


37/35 








PA.ORO 


OOFF 


36#39 


3 7/ 6 








PA. OTA 


2900 


36*24 


36/25 


3 8/46 


39/ 4 




PARINP 


E3F0 


24/53 


3 8* 40 


38/42 






PARCUT 


EC04 


24/59 


25/ 9 


38*58 


3 8/60 




PB.CDR 


0000 


36#35 


37/12 


37/41 






P3.CDT 


0004 


36#3i 


37/17 


37/46 






PB.CTL 


2903 


36#29 


37/13 


37/13 


37/42 37/47 




PB.DIR 


2902 


36#28 


37/15 


37/44 






P6.DR 


OOBF 


36#41 


37/14 


3 7/43 






P6.0TA 


2902 


36*27 


3 6/23 


3 7/20 


37/49 38/ 4 




PB.DTI 


OOOB 


36*43 


37/48 








PS.DTO 


0002 


36*42 


37/19 


39/ 5 


39/ 7 




PIAAO 


EF61 


29/ 3 


29/11 


42*23 






PIASD 


EF62 


29/34 


42*24 








PIACTL 


E503 


38,«17 


38/22 


33/27 


38/45 




PIS20 


E3EB 


38/24 


33*31 








PIS30 


EBED 


3 8/30 


3S*33 







11/28 



38/26 



39/ 6 



3 9/8 



SORCIM 803x Assembler var 
Osborne CP/M 2.2 C6IDS. 
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o 



PISTAT 


ESD4 


24/47 


3 8*19 


38/41 






PNCH 


E925 


5/16 


22*60 








POSIO 


E3D0 


38/ 5 


3881 3 








PQSTAT 


EBCl 


25/ 4 


Zlfbl 


38/59 






PP.IM 


0002 


36#52 


37/ ZC 


37/51 






PP.I>?0 


0080 


36i»45 


38/23 


38/29 






Pp. HDD 


E962 


36#54 


3 6/60 


37/Z3 


37/29 


37/52 


PP.ORO 


00*0 


36#45 


38/ 5 








PP. OUT 


0001 


36#51 


36/61 


37/22 






PP.UND 


0000 


3 6*50 


3 6/54 








PRINT 


E8FQ 


16/18 


21*23 


21/31 






PRNTER 


E567 


5#61 


31/ 9 








PRTIO 


EAAD 


31#19 


31/23 








PRT20 


EAC4 


31#33 


31/37 








PRTOUT 


EA93 


25/ 8 


31l» 7 








n PSAVE 


EFE8 


43#43 










PTRCIN 


E981 


22/38 


24#50 








PTRCOU 


E989 


22/45 


24#56 








PTRCST 


E979 


22/32 


24*44 








PTRLIS 


E999 


22/55 


25* 6 








PTRLST 


E991 


23/33 


24*61 








PTRPNC 


E9S9 


23/ 2 


24*55 








PTRRDR 


£981 


23/ 9 


24#49 








n PUNCH 


E512 


5*16 










n RX79X 


EFC2 


43# 7 










n *AGS 


EFDO 


43«20 










RDFLAG 


EF21 


19/11 


19/55 


41#54 






^OR 


E920 


5/17 


23# 7 








^ORFM 


0001 


3 2#10 


32/27 








^EAO 


E703 


5/23 


16S29 








n READER 


E515 


5#17 










n ^EGS 


EFEO 


43#34 










^HC 


EA26 


29/ 2 


29S 9 








n RIBIT 


00*0 


32# 8 










RISHT 


E590 


6/19 


6«44 








RIPORT 


2CQ1 


32i» 7 


3 2/16 








RNOV 


EFOl 


41«20 


41/21 








^OMCDl 


E568 


10#12 
35/ 9 


27/29 

35/18 


2 8/48 


33/61 


34/ 9 34/20 34/57 


R0»1CDE 


E663 


5/31 


5/32 


5/35 


5/36 


5/37 5/33 5/39 






5/40 


5/41 


5/42 


5/43 


5/44 5/45 9S43 


R0MJ>1P 


E66A 


5/30 


10«15 


11/44 


15/11 


20/40 


ROMRAM 


EF08 


9/25 
41«26 


9/35 


10/32 


10/46 


14/46 40/14 40/35 


ROHRI 


E54F 


5/29 


9#34 








n ROMSTK 


EFCl 


43# 3 










RQHV?C 


0100 


10/13 


15/ 9 


20/30 






n RRDK 


E527 


5#23 










n RRI 


E533 


5#29 










RSELOK 


E518 


5#19 


11/41 








RTRC 


EFC4 


41#22 


41/23 








RTRY 


EF05 


20/35 


20/44 


41«23 






n RWDK 


E52A 


5iS!24 










SIOS'1 


002E 


3S32 


7/31 


7/44 


7/57 




SAVADR 


£909 


20/32 


20/37 


21*33 






SAVSEC 


EFl* 


41#37 


<H/41 








SAVTRK 


EF15 


41*38 


41/42 








SSAUD 


E53C 


5#32 


14/59 








SCRL 


EA36 


29/ 7 


2 9/24 


29*29 






SCRSZE 


E56A 


6« 6 


14/60 









o 

o 



SGRCIM 303x Asseirblar vsr 
Osborne CP/M 2.2 CBIGS. 



<:/5'i/l= 



59:92 Page 49 
=:CCCRAM2 .ASK 



O 
o 

3 
■o 



O 

o 





SDISK 


EF17 


41*39 


41/43 








n 


SEC6 


EF69 


42*36 










n 


SECS 


EF63 


42#35 












SECT.^N 


e6FA 


5/26 


13* 9 








n 


SEKDEL 


EF13 


41#35 












SEKDSK 


EF18 


11/30 


19/35 


19/46 


41*47 






SEKSEC 


EF13 


19/14 


19/22 


19/34 


19/35 


19/52 




SE<T^K 


EF19 


11/12 


11/13 


12/ 9 


17/46 


19/49 




SELDl 


E601 


11/29 


11#43 










SELOSK 


E680 


5/19 


11*19 










SE^FLG 


EAD8 


30/35 


32#11 


3 2/25 


32/29 






SETOMA 


E5F5 


5/22 


12=*52 


15/20 






n 


SETRRil 


E644 


9#16 












SETSEC 


E6F0 


5/21 


12*37 










SETTRK 


E6DD 


5/20 


12* S 








s 


SI. 120 


0055 


6/ 5 










s 


SI.RRD 


OOCl 


30/16 










s 


SI.S16 


0055 












s 


SI. 36* 


0056 












3 


Sl.TRO 


0002 


30/ 6 












S1GN3N 


E792 


15#61 


16/17 










3 I STAT 


EA6B 


24/45 


30*14 


3 C/ 30 


31/26 






SOSTAT 


EA62 


25/ 3 


30* 4 


30/49 








;PIN' 


EA7* 


24/52 


30*29 


30/31 


31/23 


31/29 




SPOUT 


EA87 


24/58 


30*47 


31/ 3 


31/18 




n 


SSAVE 


EFEA 


43#44 












STOHL 


E690 


10/19 


10/26 


10*60 


24/ 9 


24/14 




STRB 


0020 


36*47 


39/ 5 








s 


SVER 


0001 














SM2RAH 


EC2C 


30/33 
39/ 9 


30/56 
4C»26 


3 1/50 


32/30 


38/ 9 




SW2R3H 


ECIE 


30/33 
38/61 


30/53 
40* 5 


31/47 


32/15 


38/ 2 


s 


SYS 


0005 












s 


SYSDAT 


0010 












s 


SYSL 


0006 














TEH 


EFOO 


41#19 


41/20 










TEMSEC 


EF20 


12/33 


21/ 6 


41*53 






s 


TIMPTR 


0040 


15/39 










r 


1 TKEY 


EF5C 


42#15 










s 


TRJE 


FFFF 


6/ 4 


30/ 3 


30/18 


38/ 7 


33/32 




UNACNT 


E=52 


11/11 


12/26 


17/10 


17/45 


17/52 




UNASEC 


EF55 


13/10 


17/57 


18/ 6 


42* 6 






JNATIK 


EF53 


12/10 


17/47 


17/61 


18/ 3 


42* 5 




JP 


E59C 


6/18 


6*43 










VERS 


0016 


1»48 


16/ 9 


16/ 9 






s 


VFLQ 


FFEA 


29/ 4 


29/12 








s 


VLDL 


0034 












n VRTQFF 


EFEF 


43#49 












4aOOT 


E734 


5/11 


15* 5 








n WRALL 


0000 


3#36 












WRDIR 


0001 


3*37 


18/21 










WRIT2 


ESOC 


17/43 


17*52 










WRIT3 


E825 


17/50 


17/60 


18* 6 








HR1T4 


E82A 


17/55 


18* 9 










WRITE 


E7F0 


5/24 


17*27 










HRTYPE 


EF23 


17/41 


18/20 


41*55 








WRUAL 


0002 


3#33 


17/42 










XLT3L 


E563 


6# S 


2 7/41 










XtTKEY 


' E9B0 


27*10 


27/21 


27/47 







21/ 7 
41*46 



41*45 



31/34 



42* 4 



o 

o 



SORCI« 3C3x Asssnrblsr ver 
Osborne CP/«^ 2,2 CBIOS. 



3.5 = 



<:/55/7= 5^:<)2 Page 50 
E:QCCRA,''.2 .ASM 



KLTS 


E600 


6*56 


7/10 


!(Clrr 


0313 


31« 3 


31/31 


XQN 


0011 


31# 2 


31/36 


XONXQF 


EAB7 


31/13 


3l«25 


XXX 


EC3A 


'tOfi-lS 


«0/44 



T/22 



7/35 



ROM/BIOS 1.4 



SO^CI'^ 808x- Assembler ler 
^i.'* ST0a4G€ La:ATI3NS 



3.5E <:/55/7= 



=9:92 Pi33 

3:R0t1141 . 



1 
4S1 



O 
o 



*A3S 

*CDDE 
*DATA 



0000 3FFF 

3FFF 0000 

OFFF 0000 

;.Oate: 9/13/32 
;.&jt»ior: Daniel E. 3rown t. ^oger W. Chapnian 
;.Titl=: DOUBLE 3ENSITY W^ : X^l l-*l 
; .CoTimentsJ 



o 
O 




0000 = 0000 



ORG 



;FWA of -neTiory 



0007 


;3ELL: 


= 


•G'- 


40h 


JRing the 3el 1 


030S 


MCUP: 


= 


•K'- 


40h 


;Movs cursar us 


oooc 


MC?I5H: 


~ 


•L'- 


43h 


;Move cur sor r ignt 


OOIA 


VCLRS: 


71 


•Z'- 


40h 


;Clear and ha-na cjrsar 


OOIE 


VH3ME: 


= 


• A* _ 


40h 


;Home Cursar 


0023 


VLOCK: 


- 


•*• 




;loc^c Keyboard 


0022 


VUML<: 


= 


• n • 




{Unlock keyboard 


003D 


VCAD: 


= 


• = • 




SCursor Addressing 


0053 


VS4D: 


= 


,£. 




;3crsen Addressing 


0051 


Vive: 


= 


•Q> 




nnsert Char 


0057 


VDELC: 


= 


•w 




{Delete char 


0045 


VI'JL: 


= 


•E' 




; Insert 1 i ne 


0052 


VOELL: 


= 


•R' 




;Del ete 1 i na 


0054 


VCEOL: 


= 


•T' 




JClear ta end of line 


0029 


VSHI: 


= 


')• 




SStart half intensity 


0028 


VEHI: 


= 


M' 




;end 


006C 


VSJL: 


= 


•I" 




;Start jnder 1 i ne 


006D 


VEUL: 


= 


■n* 




;end 


3067 


VS3H: 


— 


•g' 




.Start graphics 


0047 


VEGH: 


= 


•G' 




JEnd 


0081 


ROtJOH: 


= 


OBIH 






0057 


SI.MRST 


= 


10 


101 lib 


SMaster reset 


0055 


SI.S15: 


= 


10 


_101_01b 


;Select 16x :I3C<> x-nit/r 


0001 


SI.R^DY 


= 


01 




;Receiver ready 


0002 


si.T?oy 


'= 


02 




{TranSTiit ready 


0056 


NHIA: 


= 


66h 




:NHI address 


1000 


LVIEil: 


= 


128* 


32 


{Length of video memary 


FFEA 


VFLO: 


= 


-22 




{First line video offset 


0030 


VLL: 


= 


128 




{Length 3f one video line 


0085 


SCLF^E: 


= 


0B5H 




{for DELAY routine 


000& 


LF: 


= 


OAh 




{*Jt IF = Line Feed 


OODO 


:r: 


= 


ODh 




{*M, CR = Carriage Retjn 


OOIB 


E3C: 


= 


IBh 




{*[. ESC = Escaoe 


007F 


ERC: 


= 


7Fh 




{ill egal key 


0008 


BK.S: 


= 


08h 




{SACKSPACE 


0009 


TAB: 


= 


09h 




{TAB 


0003 


tL_LEM: 


= 


3 




{KEY LIST LEMT^ 


0002 


KLE.LEN 


= 


2 




{KEY LIST ENTRY LEMTH 


0007 


ICL.USED 


= 


7 




{KEYLIST EMTRY USED 



9 

■q 



SD5CIM a08x assembler i/er 
RAM STORAGE LO;4TI0NS 



3.5E <:/55/r= 



O 
o 



0006 


KY.S^VD 


= 


6 


0038 


<RaW_H: 


= 


3BH 


0007 


KC3L H: 


= 


7H 


OODl 


OB.Cf: 


I 


1 


0018 


l^PTZT. 


= 


l^t 


0006 


SRPTCT: 


= 


6 


0007 


TOT ^OW 


= 


7 


3002 


:tl_kv: 


= 


2 


0003 


&LPH Ky 


= 


3 


0004 


SHFT KY 


= 


4 


0003 


SLO.kT 


I 


3 


0080 


3RTBIT: 


= 


8Qh 


0030 


0I1BIT: 


= 


OOh 


DODA 


MR^T^Y: 


= 


10 



=9:92 Page 2 
3:R3fil41 .4SV 



;key servi:e3 on^e 

ifOW NJM3E? ''iSK 

;COL NU«3E? i^ftSK 

:DFBOUNCr COUNT 

;1MITIAL REPEAT :aUNT (+DOMS) 

;SEC3N0 REPEAT COUMT (10DM3) 

:TnT4L Raws 

tCDLJ*IM NJt13ER OF :TL.4L>fH AND SHIFT <EYS 



:repeat :auNT foi slide <eys tsosis approx) 

!s3t brt/diTi nsiTiary BRIGiT 
;set brt/diT m»«nor)/ 3IM 
;nljm')er of retrys 



;memory mapped i/o 



2100 
2100 
2101 
2102 
2103 
2200 
2900 
2901 
2902 
2903 
2900 
290C 
2901 
2902 
2902 
29 03 
2400 
2A00 
2A01 
2A01 
2C00 



D.:H3R: 
O.STSR: 
3.TRKR: 
D.SECR: 
D.3ATR: 
H.ICEY: 

:pdra: 

CCRA: 

:P0R9: 

:c?3; 

iJA.DTA 

PA.OIR 

'A.CTL 

P3.0TA 

P3.0IR 

'B.CTL 

H.SCTRL 

H.SSTS: 

H.SX»<T: 

^.SRFC: 

H.^13: 



0210QH 

o.cm;r 

D.CMOR+1 

D.C10R+2 

O.CH3R+3 

02200H 

0290DH 

CPORA+1 

:pora+2 

CPDRA+3 

:PDRA+a 

PA. OTA 

CP3RA+1 

CPDRA+2 

P8,DTA 

:pdra*3 

O2AO0H 
O2AO0H 
02A00H+1 
02AODH+1 

02CO0H 



DIS< :31»1A?4D RES 
t^EAD) 



;F lODoy ii sK 

;status res 

;track res 
;sector ibz 

;OATA RES tR/W) 

;Keyboar 3 

;P9r i Dher a 1/ 5i re:ti 3T ragistBr 

:Control register 4 

;Per ipher a I /Di re3t i 0-1 rsjister 

:Control register 3 



(.^^ITE) 



iSet control rag I^rite) 
;Status rs3 (read) 

; Transiri t addr ass 
•Receive (read fron addrass) 
;Vid90 memory controls 



:RAH memsRY LOCATIONS 



EF30 


ft*!: 


=: 


OEFOOH 


EF35 


RTRY: 


- 


3EF354 


EFD8 


ROMRA": 


r 


0EF03H 


EF09 


OSTSe.: 


= 


0EF09H 


EF3F 


3MAD^: 


= 


3EFCFH 


EF13 


St<OEL: 


= 


0EF13H 


EF14 


SAVSEC: 


= 


OEFliU 


EF15 


SAi/TRK: 


= 


0eFl5H 


EF17 


SOISK: 


■=■ 


0E!=17H 


EFSO 


HSTACT! 


= 


0EF53H 


EF55 


UNASEC: 


= 


0EF55:H 


EF56 


LDGSEC! 


= 


OEFSSH 


EF59 


<EYLCK: 


= 


CcF59H 


EF5A 


:u?s: 


~ 


0EF5AH 


EF5E 


LKEY5 


= 


0EF5EH 


EFSO 


ESCH: 


- 


DEF63H 


EFbl 


PIAAD: 


= 


0EF61H 


EF62 


PIA30: 


= 


0EF62H 


Er6A 


OACTtfS: 


- 


0EF6AH 



( 1) USED !N 333T ROJTI'JES 

(1) RET^Y :3UNTER 

(11 '.OH/RAM FLAG 

(1) SIX SYTES F3R DIS< INF 

(1) disk; DMA 4D3RESS 

(11 0I3< STEP DELAY 

(1) SECTOR 

(1) TRASK 

(1) 3IS< 



5(1) KEY334^: 

;( 1) 



lt:<eo cel. 



■.(1) 

S( 1) 

:( i) 0!5< active 



SO^CIM 803x Assembler ver 
UAH STORAGE LDCATIDNS 



3.5e <:/55/7= 



=9:92 Page i 
3:R3«1*1 .ASH 



3 

T3 



O 
O 



EF59 


9ELC>IT: 


= 


OEFSBH 


EF6C 


LLIMIT: 


= 


0EF6CH 


5FSE 


LOTR<: 


= 


0EF6EH 


EF5F 


IESTK: 


= 


0EF6FH 


EF99 


ISTK: 


= 


DEF99H 


EFCl 


ACIAD: 


= 


OEFCIH 


EFCl 


»0HSTK: 


= 


OEFCIH 


EFC7 


DSKSMP: 


= 


0EFC7H 


EFCA 


NUHSEC: 


= 


OEFCAH 


EFCC 


SEQ: 


= 


o£fc:h 


EFOO 


SAVTYP 


I 


OEFDOH 


EFDl 


K_<ICWi 


= 


OEFDIH 


EF02 


:CPADR: 


= 


0EFD2H 


EF34 


KEVLST: 


= 


OEFDIH 


EFOA 


SEIFLG: 


= 


OEFDAH 


EFDB 


IE.AORS 


= 


OEFOan 


EFOC 


IE. CHAR 


= 


OEFDCH 


EFDD 


PIACTL 


= 


OEFDDH 


EFDE 


PP.MDDE 


= 


OEFDEH 


EFEF 


(^RTOFF: 


= 


OEFEFH 


EFFO 


INTBL: 


= 


OEFFQh 


FOOO 


FWAV)<5 


= 


OFOOOH 



:{1) IS 9ELL RINGI'JG 



:(2) SAVE STAC< POINTER ^E^E 
;(-40) IMTERUPT STACH 



;t-40> ROM STACK 


5(1) 


DISK SWAPEO CELL 


:(2} 


NUH3E^ DF SECTORS TD R/>/ 


;(2) 


COUNTER 


;(i) 


DIS< TYPE 


!t 1) 


NUHSE^ OF SECTORS T3 READ OR ><RITE 


;t2) 


This loiatian is assigned in aiDS aid filled 


Ubi 


KEY LIST GOES HERE 


;(i) 




;(!» 


devica addrsss 


5(1) 


IE ino :har bjffer 


;(i) 




;(i) 


Parallel port inpjt» outputt undefined 


:u) 


LAST i/ERICAL 3FFSET 


;{I6i 


1 interrupt vector table 


;first address of *<emqry hap 



in by loader in Wn 



IEEE EOU&TES 



SORCIM 808x Assembler *er 3,5E <:/55/7= 



=9:92 Pags * 
8:R0M141 .iSH 



;port ctl register constants. 



3 



O 



332A 
OOZE 



0030 
3004 



PA.CDR = 
l>A.CDT = 



PB.COR 
PB.C3T 



00101010b 
00101110b 

OOOOOOOOo 
tlOOOOlOOb 



!to addrass Dort a dirsction 

;to address oort a data and set 

;port a in input proaran handsnake mode. 

;to address oort b direction 

;to address oort b data 



O 
o 

3 

13 



tdirection register constants 



OOFF 


PA.DilO 


= 


OFFh 


0030 


PA.D^I 


= 


OOh 


003F 


PB.D^ 


= 


OBFh 


0002 


PB.DTO 


= 


OOOOOOlOb 


0033 


PB.OTI 


= 


OOOOlOllb 


00*0 


PP.Q^Df 


s 


OlOOOOOOb 


3380 


PP.IROY 


= 


lOOOOOOOb 


0020 


ST?B 


= 


001300000 




;port modes 




0001 


PP.OJT 


= 


1 


0002 


PP.IM 


r 


2 



;port a outpjt mods 

Sport a jnjut node 

;port b direction 

•port b data for ojtout 

Sport b data for inpjt 

toutout rdy oit in pib 
!input rdy bit in oia ctl 

;strobe bit in port b 



reg 



;IEEE control codes 



0040 


lE.TALK = 


*0h 


005F 


lE.UTLK = 


5Fh 


0020 


lE.LSTN = 


20h 


303F 


lE.ULST = 


3Fh 



;Tiake talkar 

•make untal^ 

• make I i stener 

• make unl i sten 



9 



DISK EOUATES 



SOICIH 808x issembler irer 3.5E 



<:/55/7= =9:92 Paga 5 
B;R3M1*1 .4SH 



0010 


a.SE<: 


= 


OlOH 


0020 


O.STP: 


= 


020H 


0040 


D.STPl! 


= 


040H 


0060 


O.STPO: 


= 


060H 


0080 


O.^DS: 


= 


080H 


OO&O 


D.WRTS! 


= 


OAOH 


Do:o 


:>.KD\: 


= 


DCOH 


OOEO 


O.tOT: 


= 


OEOH 


OOFO 


D.WRTT: 


= 


OFOH 


OODO 


D.FIMT! 


= 


0D3H 



;SEE< 
.•STEP 
;STEP IN 
;STEP OUT 

;read se:tdr 
jwrite sector 
:reao aooress 

;REA3 TR4CX 

swrite t^&ck 
;force i'jter^upt 



;HAC^a DEFINITION 

ENAOIM: macro 

OUT 2 
ENDH 



DISDIH: MACRO 

OUT 3 
ENDM 



o 
o 



e 



O 
o 

■a 



O 
o 



Monitor Main Loo?. 



SO*CIM 808X Assemblsr </er 3.5E <:/55/7= =9:92 Paga 6 



0000 



0000 

0000 31C1EF 

0003 CD350E 



0006 



OOOS E05E 



OOOA 
300C 



3EEF 
E0*7 



OOOE 21FC06 
0011 22F8EF 



*C11 

STARTi 

tlnitialize all dependent hardware. 



PRQC 

LDK 

CALL 



SP.ROMSK 
FORIHT 



;SET STACK 

;0IS4aLE CU^^ENT OIS< C3I1MAN5. IF ANY 



:disasle dim bit 

aiSDIH 

;SET IMTERUPTS 

;SET MODE 2 IMTERUPTS 

IH2 

;SET INTERRUPT REGISTER 



LDK 

MOV 



A, high I>4T3L 
I. A 



;SET KEY8QAR0 VECTOR 



LDK 

STQ 



HLtG^EY 

HL.INTSL»(**2I !set keyboard interrupt 



;SET SERIAL VECT3R 
;SET IEEE VECTOR 

»I«4IT1ALIZE MEMORY 

SCLEAR ALL BUT INTERUPT VECTORS 



0014 
0017 


2100EF LDK 
06^0 LOK 




^L^OEFoo^ 

B.OFOH 


;START 

:lenth 


0019 


AF XRA 




A 




OOIA 


77 :CLDDP: STO 




AtCHLl 




OOIS 
OOIC 


23 INC 
lOFC *D01At OJNZ 




HL 

:CLODP 


:CLEAR L33P 




;SET VALUES 


OF 


ONE 




OOIE 
301F 


3C INC 
i259EF STO 




A 

AtKEVLCK 


;A = ONE 

;inclicat3 MOT locks 



0022 *F 



00Z3 3C 
0024 3213EF 

0027 CD&800 



MOV C»A 
;SET VALUES OF TWO 



INC 
STO 



CALL 



A.S£<OEL 
SPAO 



;for "IE. CO" 



:A = TWO 

;set seek stsp rata -0^ 5EMIENS 

;set UD for output (SAVES ^EG C) 



SO*CIM eOBsf Assembler ^er 3.5E <:f5m^ =9:9? Pajs 7 

'Monitor Ha i n LaoD. e:R3Mlitl .IS" 
O 

5 ;lTtia! ize IE£e oort 

3 002A :03539 CALL IE. CO ;?.EG C = l {SAVES ?Ej :) 

g ;33t beginning line to 
ro 

§ 0020 OD DEC C ;C=3 

§■ OOZE C08600 CALL DPiiO 

3 

O ;s9t for -10 char position 4ND 0DU5LE DEVSITV 
o 

•o 0031 DEEA LOK C.VFLO 

B 0033 CD7930 CALL DPAD 

o 0036 3E83 LOK 4.VLL 

■g 0038 326CEF STO A.LLI-iIT Jsst max lina Unit 

g 

o ;Rss9t-Mast3r clear the 3 1 CI (ACIA) 

0033 0E55 LK CtSI.Sli ;select 16x :l3C< for 12D0 bjj: 

0030 COB20B CALL SIRST ;res9t 

*SIGN ON PRO>i?T 

00*0 119F01 LOK DE.IMSS 

30*3 CDBODO CALL OSTR sOutout initial nessags 

00*6 -B EI iENABLE INTERUPTS 

0047 C07303 CALL CI ;Get charaatsr 

004A FEIB C><P ESC 

OO'fC CA400F JZ HC30DT ;IF COLD 330T 3F= 3F HARi DISK 

00*F 21C7EF LK -IL.OSKSW M\%\ swap call 

0052 FEOO C*IP CR 

005* CA5502 JZ CSODT ;if 00 1 J boot off 3f 4 

0057 3* INC Chi] ;swaD drives: A=3, 3=A 

3058 FE22 CMP • •" 

005A CA5532 JZ CBOOT ;)f cold boot off of 3 

005D 18A1 "3000$ JR START :LOOP 



o 

o 



O 

o 
3 



i'.onitor Main Looo. 



SD^CI'^ 803x Assembler vsr 3.5E <:/55/7= =9:92 Pags B 



SIMTERUPT VECTOR FaX RESET SUTTON (NON ^&S<43LE IMTERUPT) 
D05F = 0066 ORG NHIA 

3056 1898 *3Q30t JP. START :START 



O 

o 



o 

o 

3 



O 
o 



•Monitor lain Lood. 

0068 



0068 

0068 71012C 

005B 3503 

3060 23 

OOSE 36FF 

0070 23 

0071 23 

3072 23 

3073 3600 
3075 23 
0076 36FF 
0078 C9 



SO^CIM 808x Assembler i/er 3.5E <:/55/7= =9:92 Pags 9 

3:«asil41 ".SSI 



SP40: 
Sst ^lA for outout 
E N T ^ T 



;e)(it 



;hl 



H. vin+2 



;CHAMG? 

iHL 








PRQC 








LOK 


HL.H.VIOH 


;h.vio+i 




STQ 


3,i:hl] 


!set dati dirsotioT 




OEC 


-!L 


SH.VIO 




STO 


OFFh.HL] 


;set all 4 1 i nas as 


'J t a J t 


INC 
INC 
INC 


HL 
HL 


:H.viOti 
;h.vid+2 
;h.vic+3 




STO 


0,[HL] 






DEC 


HL 


iH.yia+2 




STO 


0FFH.[HL3 


Ssat all 3 1 inas as 


OUtDJt 


RET 









>\onitor 'tain Loop. 



SO^CIM 303X Assenblar ver 3.5E <:fS5/l^ =9:92 Page 10 

3:RD''il'Vl .ISM 



e 



0O79 



3PAD: 
Odtout data to pia & rejistsr 
PI A def i n i t i on. 

755*3210 
<.__+ — +--+ — +--+--+--+ — + 
1 horizontal offset IDQ! 



*N3TE 



Tne DDIIouble density) Pit is invartsd and tne jjinoer nust be installed on the oc board. 
If tn? oit is \.QA dojble density is set if it is HIS4 single density is set. 



*N3TE 



3it of "PI 440" 



O 
o 



0079 



0079 


3E07 


0073 


32012C 


007E 


79 


007F 


3261EF 


3082 


32002C 


0085 


C9 



; 


set 


: 


reset 


»N3TE* 




;S4VE 


^^L 


:ent^y 




:c 


= 


JEXIT 




;n3N = 






PR DC 




LOK 




STO 




MOV 




STO 




STO 




RET 



s i ng I e densi ty 
do jb 1 e densi ty 



data 



A.A+3 
4,4. VID+1 

A.C 

4,PI643 

4,H.VID 



•send data 



o 

o 



••oni tor "ai n Lood. 



SO^CIH 808x Assembler </er 3.5c <:/55/7= =9:92 Paga n 



lO 

O 



0086 



OPBOs 

Output data to oia B register 

PI A def i ni ti on. 

76543210 
+ — + — + — + — ,. — + — + — ^ — ^ 

iDliOO!*G! vert offset ! 



o 

o 

3 
■a 



O 
o 



0086 



;emt^y 



sexiT 

;ndne 



PROC 



data 



00B6 


3E04 


D0S3 


32032C 


0O8B 


79 


008C 


3252EF 


OOSF 


32022C 


3092 


C9 



LOK 
STO 

1DV 
STO 
STO 



At4 

A.H.VIQ+3 

AtC 

A.PI48D 

A.H.VID+Z 



Ssend data 



n 

o 



Monitor "ain Ldod. 



^ 


3093 


113316 


?OMJ?l: 


LOK 


nE»1633h 


(Q 

3- 


3096 


1803 »D093$ 




JR 


5IDJP 


@ 


0093 


113616 


*0«J'2: 


LD< 


0E.1635h 


9 












1 

3 


009B 


2A02EF 


ai:3J': 


LD 


HL.CCPAD? 


oo9e 


19 




400 


HL.DE 


1 


009F 


E9 




JHP 


£HL] 












o 
g 

o 













SO^CIM SCI8X Assembler </er 3.5c <:/'55/7= ==9:92 Page 12 



;off3et in bios Jjtid taois 



toffsat in bios junp tapl; 



;forni aajrsss 



SQi^CIM 303x Assembler ver 3.5E <:/55/7= =9:92 'ag= 13 
"Monitor lain Loop. B:RDM1*1 .»SM 

9 

a OOftO ODOA EMBODT: 03 CR.LF 

B OOAC 40 DC • • 

s 

N> OOAD E830TS 

§ ;330T ERROR MESSAGE ROUTINE 

g" iEHm 

3 ;N3N5 

CD 

I 0040 PROC 

•a 

I OOAD llAODD LDK OE,EH330T ;HERE ON B30r ER^Ol 

o ;fall through to ostr 

•o 
o 

I 

o 



n 

o 
■a 



O 
o 



Monitor Hi'in Loop. 



OOBO 



SO^CIH 808x Assembler ver 3.5E <:/55/7= =9:92 Pa33 1* 
OSTR: 

;dutput string to cq«jsole 

:N3T=: DSTR recognizes 7F 4S AN ESCAPE SEQUENCE TD REPEAT CHA* N TI1E3. FDl«AT IS: 7=, REPEAT COUNT. 



OOBO 



OOBO 


lA 


0031 


87 


0OB2 


F5 


0083 


E67F 


0OB5 


FE7F 


0QB7 


*F 


0088 


200C •■0OC6S 


OO^BA 


13 


OOBB 


lA 


OOBO 


3D 


OOBO 


47 


OOBE 


13 


OOBF 


lA 


OOCO 


*F 


OOCl 


:DE003 


30C* 


lOFB *3o:it 


00C6 


CDE003 


0OC9 


13 


OOCA 


Fl 


30C8 


F2BO0O 



CHAl 



;ent^y 






:de 


= 


FWA 3F 


;ehit 






SNONE 


PROC 






LD 


AtlDEl 




OR 


A 




PUSH 


AF 




AND 


07FH 




CMP 


07FH 




HOV 


C.ft 




JRN2 


:4 




INC 


OE 




LD 


AtlOE] 




DEC 


A 




MOV 


B,A 




INC 


DE 




LD 


A,CDE3 




MOV 


C«A 


:2: 


CALL 


COUT 




DJNZ 


:2 


:«: 


CALL 


COUT 




INC 


DE 




POP 


AF 




JP 


OSTR 



;IF NOT REPEAT 



;repeat count 
;get repeat :har 



;output :^AR 

:IF NOT DD»4E 



;output IT 



ilF NOT 00<JE 



OOCE C9 



RET 



o 

o 



o 

o 
3 



Monitor Ha i n Ldoo. 



SO^CIM 803x Assembler trer 3.5E <:/55/7= =9s92 Pags 15 



3:R0H141 



.4SM 



OOCF 



OOCF 



OOCF 
0000 



4F 
3E35 



delay: 

;'M' MiHiseconds 

;e»jt^y 

;a 

SSCLFRE = 



0002 30 

0OD3 40 

0004 49 

0OD5 20F8 »0032t 

0007 00 

0008 20F6 *D000l 

OOOA C9 



JEXIT 

;none 



:l; 

IMLOOP! 



PROC 

MOV 
LOK 

DEC 
HOV 
MOV 
JRNZ 

DEC 
JRNZ 

RET 



Number of Mi 1 1 iseconsJs ta delay 
(Freq/10DO)/25 



C>A 
A.SCLFRE 

A 

BtB 
CtC 
IMLDDP 



?t4 ticsj 
5(4 tics) 
St4 tics) 

!<1C tics) If 1 Tis nst elapsed 



?If requested usee nDt done 



;s:lfre = 



2000^22 ;280» Zmhz 



;... defined in OCCTXT.ast 



"Monitor Wain LaoD. 



SOKCIM 803x Assembler i/er 3.5E 



<s/55/7= =9:92 Pigs IS 
B:R3M141 .ASH 



DODB = 0130 



ORG 



lOOh 



O 
o 

3 
•a 



O 
o 



0100 


C355D2 


0103 


C39C02 


0106 


C36603 


0109 


C37303 


OlOC 


C3E003 


OlOF 


C3090B 


0112 


C3090B 


0115 


C33F0B 



R3H JUMP T*9LE 
CBIOS 

sc 



JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 



CBDOT 

^800T 

SKEY 

CI 

COUT 

LIST 

LIST 

READER 



Jmps used inainly by -BIOS 
Jmps used mainly by SuperCalc 

;CBIOS DOld boot 

;CB10S warn boot 

;C8I0S <eyb3ard statjs 

iCBIOS i<eyboard iipjt 

SCBIOS lonsole outoJt 

;CBIDS I i St output 

;CBIOS punch autpjt 

iCBIOS readar inojt 



Disk I/O 



0118 


C3020C 


OllB 


C9 


aiic 


00 


OllD 


00 


OllE 


[;3300D 


0121 


C3370D 


0124 


C3A500 


0127 


:31C0C 


012A 


C3230C 


01 2D 


C3000S 


0130 


C369DC 


0133 


:39300 


0136 


C39300 


0139 


C30F0F 



JMP 
SET 
NOP 
NOP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 



RORV 



READ 

WRITE 

RAOR 

RSEC 

MSEC 

SLST 

SENDEN 

ROMJPl 

R0MJP2 

FORMAT 



:CBias 
;cBios 



CBias 

CBIOS 
CBIOS 
CBIOS 
CBIOS 
CBIOS 
CBIOS 



H3ME 
SELECT DIS< 



READ SECTOR 

i^R I TE SECTOR 

READSECTOR ANV SECTOR HEADER 

DISK SECTOR READ 

DIS< SECTOR iJRIT; 

L I St dev ic3 stat js 

SENSE THE DENSITf OF DRIVE 



FORMATING ROJTIN? 



IEEE 



013C 


C3B20B 


013F 


C33509 


0142 


C37909 


01*5 


C3BC09 


01*8 


C39a09 


0146 


C30809 


014E 


C3F309 


0151 


C33D0A 


0154 


C399DA 



0157 
015A 
015D 



C3CE06 
C3E206 
C3:606 



JMP 


SIRST 


JMP 


IE. CO 


JMP 


IE. SI 


JMP 


IE. GTS 


JMP 


lE.TC 


JMP 


lE.OIM 


JMP 


lE.OOM 


JMP 


lE.IDM 


JMP 


IE.?? 


SuperCa 


IP 


JMP 


VLDOR 


JMP 


VLOIR 


JMP 


STOOIM 



;C8I0S SIO reset 



SCBIOS 
;CBIOS 

;cbios 

JCBIOS 

;cBios 
;c3ios 
;cBios 
;cBios 



;sc 
;sc 
;sc 



IEEE Control Out 
StatJS It 
jO To Standby 
Ta<e Control 

Outpjt Interface Message 
Outpjt Davipa 'lessage 
Input Oe^ica Massage 
'arallsl 'all 



(?IDEO SLOC< "^OVE DEC 
VIDEO 3LDC< MOVE I '^C 
STO rag 3 IN ChlI 



DISK I/O 



0150 


C3F0DE 


0163 


C3DA3E 


0166 


C3DS0C 


0169 


C3FA0C 


016C 


C3090D 


OlbF 


C300DD 


0172 


C3110D 



JMP 


DMAWRT 


JMP 


DMARD 


JMP 


HOME 


JMP 


SEEK 


JMP 


STEP 


JMP 


STEPIN 


JMP 


STEP3UT 



DMA "(RITE TO C0NTR3LER 

01A READ FR0>1 CDMTROLER 

HOME OIS< DRIVE 

SESK TO TRAC< 

STEP SAME DIRECTION 

STEP IN 

STEP OUT 



Monitor >!ain Loop. 



SO^CIM 808x Ussembler ver 3.56 <:/55/7= 



=9:92 Pags 17 
3:R3W1*1 .i.S^ 



O 
o 

3 



aiT5 


C3353E 


3173 


C3EB0D 


017B 


C3013E 


017E 


C3710E 


0181 


C3E80B 


□ 184 


C3D13C 


0187 


C3S13A 


013A 


:3AE04 


0180 


C3E10A 


0190 


C3E00A 


3193 


:37803 


0196 


:35C0B 


0199 


C33E03 


D19C 


C3900B 



JMP 

lUO 
V t r 

JMP 
JKP 
JMP 
JMP 

JMP 
JMP 
JMP 
JMP 

JMP 
JMP 
JMP 
JMP 



FaRINT 

cs c *r*TO V 

FHTTRK 
SELO^V 
4CISTAT 
SCTRIca 

lEINSTAT 
lEOSTAT 
lEINP 
IE3UT 

PISTAT 
P0ST6T 
PARINP 

PAROLIT 



CSI3S 



FO^CE INTERUOT 
Format ons tra;k 

sele:t o^ive 

SE^UL P3RT STATJS 
SET TR4C< IEJ5STER 



I«J :OMT^OLe^ CHIP WITH HMUz 3N SAVTRK 



;cBios 


IEEE 


;c3ios 


IEEE 


;CBIDS 


IEEE 


;cBios 


IEEE 


!CBI3S 


IEEE 


tCBIOS 


IEEE 


;CBios 


IEEE 


;CBIQS 


IEEE 



SOilClM 808x Assembler \»er 3.56 



SIGN ON MESS4GE 



<:/'i5n^ =9:92 Pags 13 
3:RQM1*1 .»S^ 



9 



O 



O 
o 

3 



O 
o 



319F 


1A0A3A0A3A 


D1A4 


7F0820 


01A7 


1B67 


01A9 


11 


OlAA 


7F1817 


OlAO 


05 


OlAE 


13*7 


3130 


0D3A 


01B2 


7F0B20 


01B5 


1B57011B*7 


OIBA 


2020202020 


OlCl 


1B6C 


01C3 


*F53*2*F52 


Dice 


1S60 


DICE 


2020202020 


31D6 


16670*18*7 


DIDS 


ODOA 


0100 


7F0620 


OlEO 


1B67 


01E2 


01 


01E3 


7F1S20 


01E6 


0* 


31E7 


1B*7 


01 E9 


ODOA 


DIES 


7F0820 


OlEE 


1967 


OlFO 


01 


OlFl 


1B*7 


D1F3 


1329 


01F5 


202052S576 


020D 


1828 


azoF 


1B57 


0211 


0* 


3212 


18*7 


321* 


ODOA 


3216 


7FOa20 


3219 


1367 


321B 


lA 


321C 


7F181B 


D21F 


33 


3220 


1B*7 


5222 


ODOAOAOA 


0226 


7F0*20 


3229 


*9SE73S572 


023E 


1B6: 


02*0 


*1 


3241 


1363 


32*3 


20615E6*2O 


325* 


AE 



IMSG: 



36 


»Z'-*0n,lf,if,1f»if 


DB 


07Fh, 11, • • 


OB 


ESC.\?SSH 


DB 


•Q'-*Oh 


OB 


07Fh, 2*, •W'-*Oh 


OB 


'E'-*01 


DB 


ESCVEGH 


DB 


cr.lf 


OB 


07Fh, 11. • • 


DB 


ESC.VSGH.l, ESCVEGH 


DB 


t • 


08 


ESCt'l • 


OB 


•0S30RNE 1« 


DB 


ESC.'-n" 


DB 


• 1 


DB 


ESC.tfSGH,*, ESC>\/EGH 


OB 


Dr,lf 


OB 


07Fh. 11. • • 


OB 


ESC.VSGH 


DB 


•A'-*Ort 


DB 


07Fh,2*.' • 


DB 


•D'-*Oh 


03 


ESCVEGH 


OS 


cr.lf 


DB 


07Fh, 11. ■ ■ 


DB 


ESC.VSGH 


OB 


'A'-*Qh 


DB 


ESCVEGH 


DB 


ESC')' 


DB 


' Rav l.*l (cl 1982 OCC 


DB 


ESC'C 


DB 


ESC.VSGH 


38 


•0'-*0h 


DB 


ESCVEGH 


DB 


ir.lf 


OB 


D7Fh. 11. ■ • 


DB 


ESC.VSGH 


33 


■Z'-*Oh 


OS 


07Fh. 2*. 'X'-iOn 


DB 


•C'-*Ori 


DB 


ESCVEGH 


OS 


ir.lf. If. If 


OB 


07Fh, *. • ' 


DB 


' Inssrt di sk in Or i ve ' 


03 


ESC 1' 


OB 


•A' 


OB 


ESC'Ti' 


38 


• and srsss SETURN* 


DC 


« ^ t 



SO»CIM eOSx assembler ifer 3.5e <:/55/7= =9:92 Pags 19 
3o3t C>/H from disk. 3:RaM14l".4SM 

O 
o 
? *C23 

CO 

2 0255 C330T: 

• ;L0AD all the operating system INCLUOIMG THF C5I3S 

g SENTSY 

" JN3NE 

o 

a 

JEXIT 

1 ;A = DRIVE TO BDOT FROM 

I 0255 psac 



o 

o 



SSET "SAVTYP" 



D255 
0258 
0258 


C0320C 
CD!>90C 
2805 »3252$ 


:l: 


CALL 
CALL 
JR2 


RORV 

SENDEN 

:2 


0250 
3260 


CDADOO 
18F3 »3255$ 


:E^R: 


CALL 
JR 


E3D3T 
:l 



:home orive 
;determi»je density 

;IF GOOD 

;print error 



>READ AND SET FSA OF CCP 

0262 210030 :2: LDK HL»03300H 

0265 220FEF STD KLiDXAOR SSET OHA 

t>268 E5 PUSH HL 



0259 


3E01 J3; 


LDK 


A,l 




026B 
a26E 


3214EF 
47 


STO 
HOV 


A.SAVSEC 

8, A 


;SET SECTOR 


026F 
0272 


CDICOC 

2805 "3279* 


CALL 

JRI 


RSEC 
:4 


SREAD SeCT3R ONE 
;IF GOOD 


0274 
3277 


CDAD30 
18F0 *0269$ 


CALL 
JR 


EBDOT 
:3 


;PRINT E^ROR 



*CHEC< FIRST TWO 3YTES Or THE CCP 
0Z''9 tl :4: POP hL :HL = 0OD03H 

SFIRST BYTE 
5IF NOT THE SA><E 



027A 


7E 




0278 


FeC3 




3270 


20DE 


"3250$ 


327F 


23 




3280 


7E 




0281 


= E5C 




3283 


2008 


*3Z5DS 



LO 


A,CHL] 


C«P 


0C3H 


JRNZ 


:ERR 


INC 


HL 


LD 


A.tHLI 


CHP 


05CH 


JRNZ 


:ERR 



:HL = 0D301H 
SSECONO BYTE 

;IF MOT THE SAME 

0285 23 INC HL ;hL = OD002H 

JSET LOAD ADDRESS 

°^^^ ^^ LD A,CHL] ;get cco addres3/130i * 3 

0287 0603 

32 89 2E00 

328B 67 



LD 


A.CHLl 


SU3 


3 


LDK 


L.3 


HOV 


H.A 



SO»CIH 803x ftssemblsr ^^er 3.5t <:/55/7= =9:92 Paae 23 
So3t :'/i from disk. 3:R3M14l .^S'^ 

% *SET NJMBE^ OF 128 BVTE BLOCKS TO READ FOX 330T 

f D28C !)63C LOK B,60 ;CCP/BOOS/CBI0S 



5 SREAD SYSTEM 

CD 

O 028E E5 CUSH HL ;S4VE FH4 FQ^ "CCPiO?" 

6 028F CDAia2 CALL BCPH Sboot systesi 

3 0292 El POP HL 

a 

9 «JJ»1? SYSTEM 

3 



O 
o 



3293 4F XRA A :ORIVE 300T3D FROM 

329'h 22D2EF STO HL.CCPAO^ !SET "CC'AOR" 

3297 110016 LOK DE»1600h ;offset far aiDS 

329A 19 ADO ^LtOE Saddress Df 3i3S it tI 

029B E9 JMP CHLl Senter can 



SOSCIM 303x Sssemblar ver 3.5E <i/55n= =9:92 Pa3=. 21 
5 t C ' / -1 from disk. 3:R3MU1 .Ji 



029C 



JBDOT: 

jload dnly the ccp 4n0 he 3d0s fro" oritf- a 
;n3ne 



o 

o 

3 



:exit 

*NaTE* 



*!3 



THIS S3UTIM? -DOES «JOT EXIT. IT Q^JLY SETS 54RA«IITE^S !=3R 3CPM:. 

NJ»«SER OE 128 3YTE BLOCKS TD READ =Q^ 333T 
DMA ADDS i=at( CCP 



O 
o 



329C 

329C D62C 

029E 2A02EF 



PRQC 



LD,< 
LD 



HL.CCPAD^ 



;CCP/SOOS and doT't read CJIDS 



3 t 



= / 1 



SO^CIM 308x 4sseTibl3r ver 3.5t 
from ci i s K» 



<j/55/T= =9:9Z Page ZZ 



02A1 



O 
o 

3 



O 
o 



SCPM: 

;l3ad all a* part of c?m '^rtm the disk 

*NOTE* 

J This loadsr ^ill I sad single or dDjble dansity and aiy njmber of sectors par traiK or sytes 

;psr sector. TEM is not zero if there ar 3 ai jheven njnb?- of se^tars to read. If this is trje the 

;last sector is read into a temporary ouffsr and tne part needed is nowed into tie njmbry. 



NUHt(eR OF 128 3YTE SLQC<3 T3 ^EAD -01 3a3T 
DHft 4D0;? =3^ :cp 



;emt^¥ 


53 


;hl 


;£XIT 


;n3ne 



B2A1 



02A1 220FEF 



PHOZ 



*SET "SOISK". "DMAJR" AN3 "SAVSEC" 



STO 



HL,0M43R 



;SET DMA 



02A'^ AF 
32A5 3217EF 
32A8 3200tF 



02AB 3C 
02AC 321tEF 



02AF C5 



XRA 
STO 
STa 

INC 
STO 



AiSOIS< 

A.TE« 



A, SAVSEC 



:SDOT 3NLr F^D" S^IVE A 
;MAKF T6M 1~13 



;set sectbr 



*SET "SAVTV" A^IO GET NJ'^E^ OF SECT3'*5 'E^ TRACK 



PUSH 



D290 


CD023C 


:RLl: 


CALL 


RD^V 


3293 


C0&90C 




CALL 


SENCEN 


3236 


2305 »023Dt 




JRZ 


:1 


0238 


CDAD30 




CALL 


E8QCT 


32B3 


1SF3 *3250i 




JR 


:i?Ll 


32BD 


31 


:l: 


POP 


OE 


02BE 


C5 




PUSH 


BC 



;SAVF NUMBER OF 123 3L3C<S 

;hdv^e D<11VE 
;OETERMINE DEMSITY 
;IF 3000 

;PR1NT E^SOR 



:0=SJM3El OF 128 31CTE 3L3C<S 

;SAVE NJ«13E;i OF S£;T3^5 IN OME T^ACK 



*SET NJMB6? OF SECTORS T3 ?EAO 



02BF 
32C2 


3AD0EF 
C83F S 


LO 

SRL 


AtSAVTVP 

a 


32C4 
32C6 
32C8 


C33F t 

E603 

2318 »02E2S 


SRL 
ANI 

JRZ 


A 

0000.03113 

:2 



;A=NJMBe^ OF 3rT5S IM ONE SECT3R(0-3) 
;:F 128 3YTES SECTORS 



SGET NJ1SER TG DEVIOE BY 



02CA 47 

02Ca 3E01 

32CO :327 S 

32CF lOFC *32C0S 

3 201 47 



:1L03»: 



MOV 
LDK 


BtA 
A,l 


SLA 
DJNZ 


A 
:1L03P 


^OV 


B.A 



;3=NJM9E^ OF 3YTES IS ONE SECT3R(l-3) 

;TIMES T;J3 

SNJMSER TO OH/IDE 3Y 



o 

o 
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;A=NJM3t^ 3F 128 BYTE BL3CKS 

;SUBTRmC< wITH DIvISj^ 

;SAVe FL&GS 

;CGUNT 

:REST0RE FL43S 

;IF REZULT IS ZE13 ( M3 P^RTIftL SECTORS) 



0232 


7A 








MOV 


4,0 


02D3 


1600 








LDK 


0,0 


B2D5 


90 






:2LaDP: 


Su3 


B 


32D6 


08 






$ 


EX 


AF 


0207 


14 








I'JC 


D 


D2D3 


08 






i 


EX 


AF 


32D9 


2807 


A 


02E 


;2$ 


JRZ 


:2 


D2D8 


30F8 


A 


0235$ 


JRNC 


:2L33P 


3200 


ED*4 






s 


NEG 


A 


32DF 


3200EF 






STO 


A.TEI 


02E2 


:i 






:2: 


POP 


BC 


02E3 


4A 








HOV 


CD 



;ll3D? 

;2 C3MP 

;SAVE R£<1AI)gD£' 4M3 IN3I:ATE A PARTIAL SECTOR 

9 02E2 :i :2: POP BC ;B=NJMaS* OF SECTORS I M 3^E TRACK 

:C = NJH3E^ 3F SECTORS T3 lElO 



o 

o 
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3 o t : W -i from disk. B:R3M141 .*SH 

*READ SYSTEi^ 

32E4 4F XRA A !A=0 

02E5 3215eF :TLa3P: STO A.SAVTSK ;SET TRACK 

-.CHECK FDR ALL SECTORS READ 

;SECTORS 73 ^EAD 



02E3 


79 




MOV 


A,C 


02E9 


37 




OR A 


A 


02EA 


2008 


»D2F4$ 


JRNZ 


-.3 



9 32^1 2008 »D2F4$ JRNZ -.3 !IF C IS NOT ZER3 CDNTIMJE 

3 

1 :CHEC< F3R NO PARCIAL SECTOR 

a 

9 32EC SAOOEF LD A,TE« 

•3 92EF '?7 '^''A A 

I D2F0 285B -0340* JRZ =9 JSTOP IF C = AND TE-1 = 



32F2 1826 »331At 



jR 57 ;read PA?CIAL SECTDR 

;UPDATE NUMBER OF SECT3RS LEFT TO ^E40 



02F4 90 =3: SUB B :3USTRAC< SECTORS IN ONE TR4:< 

D2F5 3002 -32F9t JRNC :4 !A>3 MORE THM OSE T^AC< LEFT TO READ 

;1F THIS IS LAST T^ACK ZERO NUHSE^ OF SECTDRS LE'=T TO ?EAD 

v,p7 ., MOV B,C ;i^EAD ALL THE ^E>1AINING SECTORS 

02F8 AF XRA A :THIS WILL ZE^O ^ES C 

SCHECK FDR NONZERO VALUE IH TESI ANO THE LAST SECTOR TO READ 

;3AVE RS>1AINIMG SECTORS TO READ 

;IF TEM IS ZERO SK.IP THIS 

;IF REG C IS NOT ZERO SICIP TH1S(N0T LAST TRACK) 
REAO ONE LESS THAN THE LAST SECTOR 

mo4 15 Dtc B ;b=3-1 

0305 2313 -331AS JRZ =7 MF ONLY 3ME SECTOR LEFT TO READ 

;RFA0 ONE TRACK 

0307 CDICDC :5: CALL RSEC SREAO (3C IS SAVED) 

D30A 2805 »0311S JRZ :S 'I^ SOOD 



D2F9 


4F 54: 


MOV 


CtA 


02FA 


3AD05F 


LD 


A.TEM 


02FD 


37 


ORA 


A 


32FE 


2807 "OSOTt 


JRZ 


:5 


0300 


AF 


XRA 


A 


0301 


31 


ORA 


C 


D302 


2003 »3307$ 


JRNZ 


t 5 



0311 220FEF 



DEC 


B 


JRZ 


:7 


;RFA0 ONE TRACK 


CALL 


RSEC 


JRZ 


:S 


CALL 


EBQOT 


JR 


!5 


:UPOATE 


DMA 


STO 


HL.D^AOR 


;UPOATE 


TRACK 



030C CDAOOO -ALL EBQOT :REPORT ER'O^ 

030F 18F6 "3307$ 



;S£T DMA 



o 

o 

3 



O 
o 



5 O 3 t 



SO^CI'^ 838x Assembler »er 
f r 11 d i s K. 



3.5E 



<s/55/7= =9:92 Page 25 
3:R3«1'H .4SM 



9314 
0317 


3A15EF 
3C 


LO 
INC 


A»SAifT^K 
A 


D318 


18CB *02E5S 


JR 


:TLOD? 



;TRACK L33P 



3 3 t 



' / H 



SO?CIM 803X Assembler ver 3.5£ 
f r 3 T 3 i s k. 
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26 



331A H5 

D3ia 2130EA 
D3ie 22QFeF 



SREAD A 



PARTIAL SECT3R 
PUSH HL 



LDK 
ST3 



HL.OiABDH 
HLtDI^ADR 



b 

3 


03Z1 


2804 » 


C 

a 


0323 


2I15EF 


-1 


D3Z6 


35 


o 






o 
o 


0327 


04 


3 


0328 


78 




0329 


3214EF 



0327t 



;SET TIIACK I? 
JRZ !10 



NEE3ED 



;SAVE aod:?ess ti w^ite t: 

;AD3'^£SS 3" HOST 9JF = £* I >) SI33 
;SET DMA 



;IF i = THrN SAVTiK iJAS '^^T I\:REMENTED 



LOK 
DEC 



HL.SAVTR< 
[HLl 



JSAVTRK 



SAi/TRK 



;SET THE SECTOR TQ 3 + 1 



:10: 



INC 
MOV 
STO 



3 

Af B 

A.SAVSEC 



a32C 0601 

032E COICOC 

0331 2305 *0338S 

0333 COAOOO 

3335 18F& •D32Et 



!RL2! 



;SET SECTOR 
READ SECTOR IMT3 ^□ST BUFF 



5READ DNE SE:T3R 
;IF GOOD 



LDK 


Btl 


CALL 


rse: 


JRZ 


:8 


CALL 


E30CT 


JR 


:RL2 



0338 
033B 
033C 
333F 


3A00EF 
47 

210000 
113000 


:8: 


LO 
MOV 
LD< 
LDK 


A.TE". 
B.A 
HL,0 
DE,12B 


0342 
0343 


19 

lOFD ••D342t 


:3L03Pt 


ADD 
DJNl 


rIL.DE 

:3L030 


0345 
0346 


E5 
CI 




PUSH 

POP 


HL 
BC 



;report er^o? 

;set m'jmber of zit's t3 transfer 

;3=njm3e^ of 128 byte block to transfer 



0347 2190EA 

034A Dl 

0346 ED30 S 



;tr4MSfer bytes 
lok hl.0ea90h 

POP DE 

LOIR 



IBC^NUMBER OF BYTES TO TRA«4SFFR 



5 source 
:[)ESTIHATION 

;MavE 



o 

o 

13 



O 

o 

3 

TS 



O 
o 



Boot 

3340 2150eF 

D350 3600 

3352 0105DO 
0355 1151EF 

3353 E030 

D35A 3E=F 

335C 3255EF 

S35F 3E7F 

0361 326EEF 

0364 ftF 

0365 :9 
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SCLESS SJFFE^S SET ?^P.R. A^O RETURN TO SVSTFwi 



LOK 

STD 



LDK 
LDK 



LOIR 



LDK 

STO 



LDK 

STO 



XRA 

RET 



HL,HSTACT 

o,chn 



: 1st byte 



BC»(La3SEC-HSTACT) 



DEtHSTACT+l 



A.OFFH 
A.U^4ASEC 



A,VLL-1 

atLOT'^< 



;0E = HL + 1 

! Dvsr I anpi ng nove 



;3et othsr drive NDT int 
SCIear error indicator 
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o 

^ 0366 SKEY: 

e JGst status of Keyboard 

to 

;Cbit set if no data ready 

(O 

3 33S6 3459EF 

" 3369 87 

y D35A C8 RZ iif locksd Kayboard 

3 

5. 3363 3A5:EF 

S 036E B7 ORA A :CHECK FD^ ZE?D 

§ 336F CS 

- D370 =SFF nsi 3FFH SIF NOT lE'.O MAKE 3F = H 

1 0372 C9 ^ET 5 1 1= DATA 



LO 


AtKEYLCK 


3R 


A 


RZ 




LD 


A,LKEY 


ORA 


A 


RZ 




nsi 


3FFH 


RET 





o 

o 



O 
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0373 :i: 

0373 RKSy: 

;Read next i<ay from kayboard 

;6XIT 

SA = last key 

0373 PROC 



3373 


CD6603 


CALL 


SKEY 


3376 


2SFB *3373$ 


JRZ 


RKEY 


0378 


F3 


DI 




3379 


3&5EEF 


LO 


A.LKEY 


037C 


*F 


MOV 


C.4 


3370 


AF 


XRA 


A 


037E 


325EEF 


STO 


A.LKEY 


0381 


79 


MOV 


A,C 


3382 


FB 


EI 





;if NO data 



9 3379 3A5EEF LO A.LKEY ;GET CHARACTER 

;clear ksy fron hold 



3383 C9 RET 



SaHCIM 808x Assembler ver 3.5E <:/55/7= =9:92 Page 3D 
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;Bit definitions for ESCH flag byta 
JNote Bit 7 is currently free. 

;B5= Screen/Cursor Addressing 

;B*= exDsgting address-cir 
;33=llast char was ESC 

;SZ= Under I i ne mode 

;B1= Half Inteisity node 

^ - uui<i tr_ui. - 1 ;B0= Graphics iiode 

o = 0007 EF.HSK: = EF_UN<-EF.H4 + EF.GR ;Mas< to gat modj. 

•o 

c 
o 

O 
o 



0020 


EF SCR: = 


32 


0010 


EF.ADR! = 


16 


0008 


EF.ESC: = 


8 


0004 


EF.UH: = 


4 


0002 


EF.HA: = 


2 


0001 


EF_G^: = 


1 


0007 


EF.HSK: = 


EF, 
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;Vsctor tbranchJ table far video outout Tiode selection 
Jcontrolled by ESCH node 

;0 Nsrmal node 

;i Graphics node 

;2 Half intensity node 

;3 Half and graprsiis 

;4 Uider ! i ne noda 

S5 Under and grapfiics 

;6 Under aid half inteisity 

;7 Under and half anj griphics 



0384 




ESCHTS: 




3384 


3704 


DM 


VNORH 


0385 


5405 


DW 


VGRAPH 


0383 


6504 


DW 


VH4LF 


D3SA 


6904 


DW 


VHA_5R 


038C 


5704 


DW 


VUMOEX 


038E 


5B04 


DW 


VUN_G^ 


0390 


5F04 


DW 


VUN.HA 


0392 


6304 


DW 


VUN HA Gl 



SO^CIM 8D8X Sssemblsr *fer 
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32 
US'! 



0394 



O 
o 

B 
•o 



a 

o 



039* 


30 


D397 


53 


039A 


57 


039D 


47 


03&0 


29 


33A3 


28 


D3i6 


6C 


0349 


6D 


Q3AC 


lA 


034F 


51 


03B2 


57 


0385 


45 


0338 


52 


0383 


54 


03BE 


23 


03C1 


22 



VALFDE: 

SValid ESC-Sequenc3 Table 

•3 bytes per entrysascii char » "DW"-Vector. no. of entries is VALETS 

;FollOM)ng body of table is 2 byte No-Mat:h adrs 

;C jr sor iddressi ig 
;Scr 3BT Address! ig 
;Set graphics node 
SCIr grapnics tiode 
:S5t half int. mods 
;Clr tialf int. node 
;Set under I i ns tijde 
! C ! r jnder I i ne node 

•Clear screen to blanks 

Jlnsert char 

JDelete char 

: Insert I i ne 

: Del ete I i ne 

;CI ear t3 end of line 

JLock (eyboard 

;UnlDC< keyboard 



08 


VCAD 


DW 


ESCCAD 


DB 


VSAO 


DM 


ESCSAO 


DB 


VSGH 


DM 


ESCSGR 


DB 


VEGH 


DM 


ESCCGR 


OB 


VSHI 


DM 


ESCSHA 


DB 


VEHI 


DM 


ESCCHA 


D3 


VSUL 


DM 


ESCSUN 


DS 


VEUL 


DM 


ESCCUN 


DB 


VCLRS 


DM 


ESCZZ 


DB 


VINC 


DM 


EINSRT 


DS 


VDELC 


DM 


EDELC 


08 


VI NL 


DM 


ESCEE 


DB 


VDELL 


DM 


ESCRR 


DB 


VCEOL 


DM 


EEOL 


DB 


VLaC< 


DM 


ESCLCK 


DB 


VUNLIC 


DM 


ESCULK 



33C4 1A04 



:end: 



DM 



CDUT2 



;No Match exit 



;i3n3re cha- uDon undefined ESC-Seguence (to treat undefined cnar after ESC as a regjiar 
;data char, should go to C3UT2). 



0010 



VALETS; 



J:end-VALIDE)/3 



I # of entr i es in table 



o 

o 



o 



O 

o 

3 



O 
o 



SO^CIM 303x Assembler \ier 
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03C6 



33C6 


OD 


D3C9 


0.4 


[)3CC 


OS 


33C = 


o: 


D3D2 


OB 


03D5 


07 


0308 


lA 


03DB 


IE 



030E 7305 



VALI 3C ' 

;Valid control character table 

;3 bytes per entry: Ascii :har , "DW"- Vector no. 

;Following body of table is 2 byte No-latch adrs 



of entries is VALCTS 



Da 


CR 


3W 


i^C.C^ 


Scarriage return routine 


D8 


LF 


OW 


VC.LF 


; 1 i ne feed 


D8 


3KS 


ow 


VC_BICS 


;bac< space 


DB 


•1CRI3H 


DM 


VC.MCRT 


;:iiov3 cursor rignt 


DB 


MCUP 


DW 


VC.MCUP 


Jiiove cursor uo 


OB 


CSELL 


3W 


VC.BEL 


;Ring bel 1 


03 


VCLR5 


Oil 


VC CLRS 


Sclear screen 


DB 


VHOME 


OW 


VC HOME 


SCjrsor Hots 



0308 



DW VQUT97 

VALCTS: = ( ( *-2 ) -V AL lo: ) /3 



;No anatch--i gnor e jndef oontrol char 
JNuTiber of valid entries 



SOSCIM aoSx Assembler ver 
keyboard aid Console Routines. 
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31^ 



3360 



o 
O 



O 
O 



03EO 



COUTs 

;Gsn3ral output routina to Video Screen 

Character 



;ent*¥ 



;cu«s 
;esch 



,ur sor 
=1 ag+Mode 



:CURS t ESCH uodated. A=;haracter 
;(bc» det Nl preserved) 

ESCH is flag + mjde byte as follows 

=00 Normal iiade E Last =hr Esc flag false 

=08 Normal mode t Last chr Ess flag True 

=01.02.04 Mode is Sraohics. Half, or Jnd5r. rsspsctively and Last :hr 

=3.5.6.7 4s above, but mode is conbinatioi 

ig-l"? Last chr esc flag Tr jeJother iji se li<s 1-7. 

PSDC 

;^ESET VETICSL OFFSET rflTH VHTOFF 



;PRESENT V4LJE 
;HQUSEICtEPING 

;L&ST VE^TICiL 0=FSET 

;ONLr viDio 

:AD0 HOUSEKEEPING 



f I ag is False. 



D3E0 


F5 


PUSH 


AF 


03E1 


C5 


PUSH 


BC 


03E2 


3a62EF 


LD 


A.PIASO 


33E5 


E6E0 


Aro 


111000003 


03 E 7 


47 


MOV 


B.A 


03E8 


3AEFEF 


LO 


A.VRTOFF 


03c8 


E61F 


ANO 


000111113 


D3ED 


30 


OR A 


B 


03EE 


4F 


MOV 


C.A 


D3EF 


C08600 


CALL 


OPSD 


03F2 


:i 


POP 


3C 


33F3 


Fl 


POP 


AF 


33F4 


E5 


PUSH 


HL 


03F5 


05 


PUSH 


DE 


03F6 


:5 


PUSH 


BC 


33 F7 


2A5AEF 


LD 


HL.CJ5S 


03FA 


3A60EF 


LD 


A. ESCH 


03FO 


47 


MOV 


B.A 


03FE 


E608 


4N0 


FF ESC 


3400 


2023 *0425t 


JRNl 


PSTESC 



;SET OFFSET 



;hL Kill usually be cjrsor/ 

;9 will oe ESCH for a ijhile 

;t3St flag bit 

;IF last CTr was ESC 



SCjrrent chr is N3T ESCaoed. Is this chr ESC? 

;Chr 



0402 


79 


MOV 


A.C 


0403 


FEIB 


CMP 


ESC 


0405 


78 


>10V 


A, 3 


0406 


2315 *341DS 


JRI 


:ESC 



;( A=£SCH> 
;i f this : 



ESC 



SQilCIM 808x Assembler i/er 
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35 
45M 



;H.2r= rfith .1 = 3 



ESCH 



o 

O 

o 



0*09 


213403 


340C 


E507 


D«OE 


37 


040F 


5F 


0410 


16 30 


0412 


19 


0413 




0413 


7E 


0414 


23 


0415 


66 


3415 


6F 


0417 


E3 


0418 


79 


0419 


C9 



SECTOR: 



?USH 


ML 


LD< 


HLtESCHTJ 


4ND 


EF_MSK 


ADO 


A, A 


MOV 


E,A 


LOK 


D,0 


ADD 


^L,DE 


LD 


A.tHL] 


INC 


HL 


LO 


K,EHL] 


MCV 


L.A 


XTHL 




10V 


AiC 


RET 





Slode Dits oTiy 
;Tiir>ss tMO 

;DE = offset 
;hl - tbl adJrs 

Sentry goi nt. note hi dt 3ta:<. 
Mst byta ( I Dw ori»r adrs) 

;2nd byte (hi orjer adrs) 

;HL = adrs froTt taile 

SRestore hi from stajk stask=t3l adr; 

SChr. nota 3=tSCH D/te tfalje 

Senter rjutlhs oar taole adrs. 



o 

o 
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041A 

041A 78 

D41B 13E3 *04D81 



C0JT2: 



MCV A,S 
JR :out 



;recal I ESC4 val J3 

(outout snr Dsr currant ssttings 



0*1D 



341D F603 
041F 3260?!= 
D422 C37B05 



:ESC: 

;Cjrrant chr is ESC. Sst flag and exit 



3R EF.ESC 
STD AtESCH 
J«P V0JT97 



:indicat3 last CTar= ;SC 
;Exi t 



o 

o 
■a 
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PSTESC: 








SLast c^ 


ir 


was 


ESC 


JETtry 








;a 


= 




EF_£SC 


;b 


= 




ESCH 


;c 


= 




Char to output 


;hl 


= 




:urs 



D425 PROC 

3425 CB&D $ 3IT 4.B ;is this cir really an ajdress? 

D427 2075 *049ES JRNZ SETXy ;...if cnr is part of an addr 

;no ojr sor /scr sen addressing in effects 

;Cir EF_ES: oit (for next tine) 
;Set up 8 = ESCH b/t3 ^alJ3. 

Ssave Curs 
;3ranch taol 3 adrs 
JTabI e si za 
;Chr to A 
3435 1815 •344CS J« LQ0KJP3 ;Go to rojtinj to orancn o>r t3l 



0429 


A8 


042A 


47 


042B 


3260EF 


342E 


H5 


042F 


219403 


3432 


lElO 


3434 


79 



XOR 


B 


MOV 


B.A 


STQ 


A, ESCH 


PUSH 


HL 


LDK 


HLfVALIDE 


LDK 


E. VALETS 


MOV 


A,C 


J« 


LQ0KJP3 



o 

o 
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3. 3437 VNiDRM; 

3- JNDRMAL -node charactsr prooessing. 

£ ;a = char to output 

M :hl = =urs 

o 

g 3437 FE20 

3 3439 3809 »0446$ JRC :2 :IF contror ::1r 

o 3439 F3 

3 343C EMA0I1 :9th bit rromory 

£ 3436 36SQ STO BRTBir.tnl] Jsat this chr =)^IGHT 

? 0440 

9 3442 F3 

"3 

§ 0443 C35EQ5 

= 3446 E5 :2: "USH HL ;S3ve Curs 

3447 21(;633 LDK HL.V4LID: JSranch taole adrs 

344A IE3B LDK E.VALCTS :Tabl9 siZ3 





-MS 


* • 




JRC 


:2 


vB^nn: 


DI 

EMA0I1 

STO 

ais:)iM 

EI 


BRTBir.tn 




JMP 


V0UT30 


:2: 


PUSH 

LDK 

LDK 


HL 

HL.V4LID: 

E.VALCTS 


» 


JMP 


LDGKJP3 



;Scan taols of valid contrDl CTrs and branch to appropriate rojtins. 
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D4«C 



O 

o 

3 



O 
o 



04-^0 BE 
3*4D 23 
344E 23C3 *D413f 



i.c:;ku=3: 

SLogJc to scan 3 oyta branch tabia 

s f^QT a subroiitins do not C^LL* 

:emt^y 

5HL = 1st byte of table (natch ooas) 

;(2Td.3rd bytss = branch adrs) 

;(t3bl9 repeats [3 byts sntriesl) 
5E = is tabis size (^o. of entries) 

;(tabla body is followed with 

•,2 oyte "No-'<atc'i" adrs) 

[Stack has HL saved as top entry. 
;C = ohar 
;A = value to s = an for possible ^^atch 

CIP [HLl 

INC HL ;(2na byte of this 3 byte eTtry) 

JR?. VECTOR ;if -natch process 



3450 23 

3451 23 
0452 13 

3453 20F7 *344CS 



INC HL ;(3rd byte of tiis entry) 

INC HL ;i3t byte of next entry 

OEC E ;Oec count of entries reTiaining 

JRNZ LO0KJP3 ;C3ntinue thru body of taole 



3455 133: *3413t 



JR 



veCTDR ;N3-«atch. hl-ooints to v^eitor 



SO^CIH 803x Assembler i^er 3.5E <:/S5/'r- =9:92 P?q3 40 

<eyboard and Console RDutines. 3:R3H141 .4S>4 

•processing for nodes ot^ier than normal. 

SVGRAPH ;Noriial noda EXCEPT: cntl chrs are printed 



O 
o 

3 



O 
o 



0*57 VUVDE?: 

;UTder I i ne onl y 
0457 FE20 CMP • • 

3459 3SDC -34371 JRC VNORM 

; J* VJN_3r 



045B VU*I_GR: 

JUTderliied Graphios 
3453 F630 OR 80h 

3450 leOC *0433$ JS V3RI5H 



;if cntl-0Tr» proijss is normal 
Jcont i nus 



Sunder 1 i T3 bit 

;set this chr BRIGHT 



045F VU^.HA: 

SUTderline and Half intensity 
045F FE20 CMP • ' 

34bl 38D4 *3437$ JRC VNORH :if cntl-^Tr. process as normal 

; JR VUN_Hi_Gr 



D463 

3463 1^6 80 



VUM_HA_GR: 

J'jTderTine. Half Intensity* Graphics 

OR 8'Oh ;set underline bit 

; JR VHA.G"? 



3465 VHALF: 

;Half Intensity 
3465 FE20 CCP ' ' 

3467 38CE "3437$ JRC VNORM 

; JR VHA_GR 



;if cntl-cTTf praa'ss as nomal 



3459 

3469 F3 

045A 

04bC 3600 

346E 

0470 FB 

0471 C35E35 



VHA_GR: 

;C=C>ir» HL=Curs 
01 

ENADIM 

STO OIHBIT,[nn 

3IS3IH 

EI 

JMP VCUT30 



;set din field bit 



icont i nue 
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D47* 



SCREEN: 
SstXY for Screen uioi/eTieTt 



ESCH 

new :o-ord valt NO OFFSET 



3474 



PROC 



o 

o 

3 



O 
o 



3474 


:370 


D476 


2012 * 


3478 


E61F 


347A 


4F 


3473 


32EFEF 


047E 


3A62EF 


3481 


E6E0 


D483 


31 


3484 


4F 


3485 


CD,3630 


3488 


182E • 


348A 


87 


3483 


C6EA 


048D 


E6FE 


348F 


4F 



:sY: 



3438S 



:sX: 



SIT 


6tE 


J^Hl 


isK 


AND 


3031 1111b 


HOV 


C.A 


ST 3 


A,VRT3rF 


LD 


A,!>1A30 


AN!) 


1110 0003b 


3R 


C 


"^OV 


C.A 


CALL 


DPBD 


JR 


IBXitY 


AOO 


AtA 


ADO 


A,VFL3 


AND 


llll_1113b 


KDV 


C.A 



i i f X-coor di nate 

;niod 32 

;sET ve^ti:a. 3ffset 



;sat Y coordinate 



= 3R :3UT 



•douole A 

SPIA A-rsg iiagic offset :0T3tant 

;clear bit 



;SET DENSITY 3IT 



3490 


3A61EF 


0493 


E601 


0495 


31 


3495 


4F 


0497 


CD7930 


349A 


C3AS 


349C 


1824 • 



LD 


A.PIAAD 


AN I 


0000.03018 


aRA 


c 


MOV 


CtA 


CALL 


DPAD 


cbit 


5,3 


JR 


:exitX 



;get old valje 

;SAVE OE'JSITY 3IT 

;0R in HDRIZDNTAL 3FESET 

SFUNCTIOM PI4 

Sfinished screen-addressing 



S0^CIi>1 iOix 4ssa!iibl3r vsr 3.5£ <:/55/7= =9:<32 Pajj '^2 
keyboard and CDnsole RoutMes. BiRl^Ml*! .IS'4 

O 
o 

■§ D49E S6TXy: 

§ ;S2t X-Y vaija for Cjr sor /Sir ean Adaressing 

- :esjt?y 

^ ;hl = surssr.addr 

S ; ■! = ESCH 

;C = :hr 

CO 

1 ;txiT 

a ;t3 VClUT90i ESC-l UDdat = d 

O 

o 

3 049E ZDfbOb 

£ 34A1 3EED 

" D4A3 81 ADO Z ;remov9 curssr Oias 

Q D4A4 CB6S i BIT 5»3 Sour sor/ scr aen addressing? 

^ 34A6 2Ci:C '3474S JRNZ SCREEN Sif scrsan addressing 



CALL 

LD< 
ADO 


UN_CJR 
A,-(' ') 


BIT 
JRNZ 


5,3 
SCREEN 



;cjrsor addressing: 



0448 


29 








ADO 


HL-HL 


34A9 


CBTD 


$ 






BIT 


6ta 


34A3 


2010 * 


0430$ 






JRNZ 


!CX 


04AO 


67 




:c-(: 




MOV 


H,A 


04AE 


3A62tF 








LD 


A.PIASO 


04B1 


34 








ADO 


M 


D492 


IF 








X4^ 




D4B3 


CSIO 


I 






<R 


L 


04B5 


F6F0 








3R 


OFOh 


3437 


57 








MOV 


4, A 


0438 


3E40 




;ex i 


tY: 


LDX 


4,0100_0000b 


D43A 


BC 








3R 


B 


D4B3 


1803 * 


D4C5t 






J^ 


:exit2 


04B0 


17 




:cX: 




RAL 




046E 


C32C 


% 






SRA 


H 


04CO 


IF 








^AR 




04C1 


5F 








ffOV 


L.A 


04:2 


3607 




:ex i 


tx: 


L0< 


4,E=_«SK 


D4C4 


40 








4*JD 


a 


04C5 


3250EF 




:axi 


t2: 


ST3 


A.ESCH 


04Ce 


C37305 








JM? 


V0UT90 



:shi ft HL left 
;X/Y coordioats? 
; i f X coDf di T3 te 

Isave 

Joffset Dy start-Y c3-3rd af viaao 
JhitOd) -> :y, shift A right 
;CY -> bi t7(L) 
;tur"i on jooar nybl 
;HL= new ijrsor addr 

•next addr-cnr hill ae X-coord 



strash 7th bit 

;bitO(H) -> CY, DitT sta/s 1 

;... CY -> oi t7( A) 



;finished addressing: rsset addr bits 



o 
o 



SO^CIM SaSx Assembler sier 3.5E <:/55/r= =9:92 Page 't3 
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"(Nr«i-^»^1 r^vH^ /iK^r'S'N + fi^ 



04ca 






vc. 


.HOME 


: 




D4CB 










P?3C 




D4CS 


.C0F6D& 








CALi 


UN_CJR 


D*CE 


3462EF 








LO 


A,?IA3D 


DADl 


IF 








!IA^ 




34DZ 


2E00 








LDK 


LtO 


3454 


CBIO 


$ 






^R 


L 


3406 


67 








MQV 


H,A 


3407 


1830 »D509S 






JR 


:f ixl! 



;Honi9 Cursar 



:bitO => CY 

;CY => Dit7. trash bitD 
Q 3407 1830 »D509S JR :fix1! SHL := HL ar FDODh 



SO^CIH 8D3x issemoler ner 3. 56 <:/55/7= =9:92 Pags "t* 
<eyboara aid Console RautiTes. S-.'-DMlifl .i5« 

o 
o 
■o 

"5 3409 «C_M:u?! :Mov2 Cjrsar J3. 

ID 



«c_m:u?! 




;A = C = Chr=>iCUP. 


HL=Cur3. 


CALL 


UN.CJ^ 


PUSH 


HL 


LDK 


3C.(-VLL) 


JR 


:fHa 



£ D4D9 :OF606 

S 0*DC £5 PUSH HL :old cursor nust na an sta^K 

O O^fDO OIBOFF 

S- D4E0 1817 '':>'t-9% JR Jfwa ;...?t tiia intry aoint 

o 

3 
O 

9 3*E2 VC.3<S: 

3 ;HL=:urs=cjr rsnt (old) ciar 

c 

5 34E2 CDF606 C4LL U*;_CJ« ;clear 30h bit 

§• 04E5 3 = 7F 

■3 3467 45 

° 34E8 2304 *04EEt JRZ rwrao ;if "nust wrap from cal 3 to LLIMIT 

s 

° 34EA 23 

34EB C37335 JMP VDUT90 ;Exit 

34EE E5 :wrap: PUSH HL ;3av3 old cursor 

34EF 017FFF 

3^FZ 09 4D0 HLtBC ;HL = prav.linsj (-l)st ^oluin 

34F3 3A5CEF LD A.LLI'IIT ;LL1MIT = #03lutms on scraan 

04F6 *F 

04F7 0600 

04F9 09 :fwa: 

04FA E3 XTHL Jget old cjrsort savs nad 

O^FB 29 ADD HLtHL Sshift Una* into H rj 

34FC 3A52EF 

34FF F6E0 3R 1110_0003b ;A = line* of JL corner 

3501 3C CMP H !s8t Zfla^: Ihons? 

0502 ci POP HL :get new cjrsor... 
3503 2004 "■3539S JRMZ :fixhl ;if MOT Jvidao home 

3505 OlOOOC LOX 3Ct(24*VLL) ;wrap constant 

0503 09 

3509 3E?0 zfixnii 

050B 84 OR H ;niodjlo result: <?eo cjrsor 

350C 67 i^OV H,A ; i ns i de vidsa menory. 

0500 1864 *0573t 



CALL 


u^;_CJR 


LDK 


A,7Fn 


ANO 


L 


JRZ 


: wrap 


DEC 


HL 


JMP 


VDUT90 


PUSH 


HL 


LDK 


aC,-(VLL<-l» 


ADO 


HLt3C 


LD 


A.LLI'IIT 


•«3V 


C,A 


LDK 


3»0 


ADD 


HL.BC 


XTHL 




ADD 


HLtHL 


LO 


ApPIABD 


OR 


lllO.OOOOb 


CMP 


H 


POP 


HL 


JRMZ 


:f ixhl 


LDK 


3Ct(24*VLL) 


ADO 


HLtBC 


LDK 


AtOFOh 


OR 


H 


MOV 


H,A 


JR 


V0UT90 



I 
O 

en 



SD^CIM S03x Assambler i/sr 3.5E <:/55/7= =9:92 Pags "tS 
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D50F 




vc. 


.BEL 


: 








SRi 


! ng 


ths bs! ! 


via s » 1 1 ! n g 


050F 


3A52EF 






LD 


A.PIABD 


3512 


F520 






QR 


OOlO.OOODb 


D514 


*F 






MOV 


C,A 


3515 


:D8600 






CALL 


DPSO 


D518 


seiE 






LDK 


A. 30 


D51A 


32SBEF 






STD 


A,BELC»JT 


D51D 


135C »057S$ 






JR 


V0UT97 



:bs! I bit 

; function PI A3 

:r ing bsl 1 for 33 ti :ks 



351A 32SBEF STD A,BELC»JT 5... = 1/2 second 

1 351D 135C *357S$ JR V0UT97 Jexit no CTaig= 

C 

o 

O 

o 



o 

o 



s 



o 

o 



SO^CI'^ 808x Assembler ver 3.56 <:/55/7= =9:9? Pags *& 
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D51F 






VC.CLIS: 






051F 


2100F0 




LOK 


HL.FHAVH 




0522 


C06106 




CALL 


CLRLN 


;c lear 1st line 


0525 


01800F 




LOK 


SCLVMEH-VLL 




0523 


DS 




PUSH 


DE 




3529 


ODEl 


t 


POP 


IX 




052B 


C05206 




CALL 


vLon 


:c lear raiiai ni ng 1 ines 


052E 


3A&2EF 




LO 


A.P1A33 


;Reset far Ist lins of d 


0531 


E6E0 




AND 


not(l.Hllb) 




0533 


*F 




MOV 


C.A 




0534 


CDSS30 




CALL 


DPBO 




0537 


AF 




XRA 


A 


;ZER3 A 


0538 


32eFEF 




ST 3 


A.VRTOFF 


;SET VERTICAL OFFSET F 3R 


0538 


2100FO 




LDK 


HLfFWAVM 


;riBw cursor 


353e 


1833 *3573* 


JR 


VDJT93 


:ExJ t 



:3UT 



o 

o 



O 



O 
o 
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35*0 




vc. 


.C^s 






05*0 


CDF606 






:all 


UN_CJR 


35*3 


3E80 • 






LOK 


A»80t 


05*5 


A 5 






4N0 


L 


05*6 


5F 






HOV 


L.4 


D5*7 


182A *D5T3S 






ja 


V0UT9Q 


35*9 




vc. 


.L'=: 






35*9 


C08*36 






CALL 


DO LF 


35*C 


1825 "35731 






JR 


voijT9a 



;erase cjrsor 
;Carriag3 Saturn 



;Lin= Feed 



o 
o 



SORCIM 308x Assembler ver 
keyboard aid Cjnsole Routines. 



3.5E <:/'iS/7- =9:92 Page 48 
BtRaMl*! -ASH 



D5*E 



35*£ COF606 

0551 7E 

3552 ISOA "355E* 



vc 


-MC 


RT 






:h 


3ve 


Cursor 

CALL 

LO 

JR 


Ri 


ight 
UN_CUR 

A, tun 

V3UT30 



ire-9cho cjrrent cir 



SO^CIM 803x Assembler \ier 3.5E <:/55/7= =9:92 Pags 49 
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O 
o 

^ 3554 :95F S 3IT 5»A 

% 3556 2806 *355E$ JRZ VGUTSD 

5 355B CB77 $ BIT 6, A 

S 355A 2802 *355et JRZ VDUTBO 

O a55C E69F ANI 9FH 

tr 

3 355E V0UT80: 

* ;E<it points for CDUT 

o ;Here to store new data and to uodate cursor 

■a 

;T-iis exit path stores 4 (teri ohar) 
055F 5D HOV E,L 

9 3560 C333 $ C3IT 7,E :E = coi(cjrsor) 



055E 


77 


STO 


A. Chi] 


D55F 


5D 


HOV 


E,L 


3560 


C3 33 $ 


C3IT 


7.E 


3562 


3A6CEF 


LO 


A.LLI'IIT 


D5S5 


30 


DEC 


A 


3566 


93 


sua 


F 


0567 


2009 »0572t 


JftNZ 


VauTB5 


D569 


3E80 


LDK 


A,30l 


3568 


A5 


AND 


L 


356C 


6F 


MOV 


L.A 


056D 


C0S735 


CALL 


DD_LF2 


3570 


1801 *3573t 


JR 


V0iJT90 



;a = last_le3at_:ol 

;A = last le3al_Dol - ;ol(our> 

;if not JLLI1IT 



;do CR... 

; • .«and LFi 



3572 23 VaiJT85: INC HL Smove cursor 

SHere if N3 cursor uodate 
0573 7E V0iJT90s LO A, [HLl ;This exit pati turns 3n SDh oit 

;Here if new data already in A 
3574 17 RAL ;lake tTis or cjrsor 

Jinvert cursor bit 

Supdate cursor 
;Here if no change to cursor, restore reg and exit 



SExit with A=chr 

;return» end of cout sjbr. 

2) {earliest possible J\ 

2) ;iatest oossiole JR 



3575 


3F 


V0UT96: CMC 




0576 


IF 


RAR 




3577 


77 


STD 


A,Chn 


3573 


225AEF 


STD 


HLtCJRS 



057S 


CI 


VDJT97: 


»0P BC 


057C 


31 




POP DE 


357D 


El 




POP HL 


357E 


79 




MOV A. 


057F 


C9 




RET 




= 04FA 


:Fir3t 


= V0JT97 - 




= 050C 


:Last 


= VaUTSO * 



o 

o 
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3530 

0580 



esc LCK: 



PROC 



;Lock Keyboard 



o 
o 

3 



0530 


*F Y.an 


0531 


1802 *D5a5i J« 


0533 


3eFF =SC_JL< LDK 


0585 


3259EF :2: STD 


0588 


18F1 *0573t Ji? 



:2 

4,DF=h 



A.KEYLCK 
VQ'JT97 



iJiloci^ <eyb3arfl 



SD^CI>1 80Sx asse.Tibler ver 3.5E <:/55/7= =9:9J Pag=> <il 
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3584 



058A E5 

0538 CD51D6 

D58e El 

358F 13E2 »D573S 



BB2L: 






;£rase 


tD en a 


of Una 




PUSH 


HL 




CALL 


CLSLN 




POP 


HL 




JR 


V0UT90 



Jsave cursar 



Sa^CIH SOBx ftssemblsr ver 3.5E <:/55/7= =9:92 Pags 52 
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O 

o 

•D 

=. 0591 ESC_CAO: 

3 JCjrsor Addressing 

e 

£ 3591 3E07 LOK A,EF_MSK 

u 3593 AO AMD B 

059+ F618 OR EF_ESC or EF.ADR ;n3xt chr i^ill &3 Y-coord 

3 0596 3260EF :exit3: STD A.ESCH 

° 3599 18E0 "OSTBi JR V0UT97 
o 

1 0596 ESC.SAD: 

£ ;Scr98n Addressing 

o 059B 3E0T LOK A.EF_MSK 

§ 059D AO AND S 

3 059E F638 OS EF_£SC or EF.AOR or EF_SCR 

S 05A0 18F* *0596$ JR :exit3 



o 

o 
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B5A2 EDELC: 

SDelate Character 



35A2 E5 PUSH HL 



05A3 


CDD*05 


CALL 


CALC 


D5A6 


£5 


PUSH 


HL 


D5A7 


DOEl i 


POP 


IX 


D5A9 


23 


INC 


HL 


Q5AA 


C0E2D6 


CALL 


VLOR 


D5AD 


3620 


STO 


• '.[hll 


35AF 


F3 


DI 




3530 




ENAOIM 


;ei 


0532 


23 


DEC 


HL 


3533 


3680 


STO 


BRT3IT,CTt] 


D5B5 




DISDIH 




35B7 


F3 


El 




3538 


El 


POP 


HL 


05B9 


1883 •0573$ 


JR 


V0UT50 



!sav= cjrsar.addr 
Seal culats 3: 



SHL = cjrsor.addr *• 1 

;inove characters 

tiast cTr beooTies blank 



;eTable 9th bit nsnory 

•HL = last cnr on this line 
!S3t chr 3*I3HT 

Imai n nenory 

Jrestore cjrsor_adjr 

inext 



o 

o 
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■s 


3538 




EI-^S^T: 






<a 

3 






;insert 


Character 


CD 


05B8 


COF606 




CALL 


UM.CJR 


S 


35BE 


E5 




POSH 


HL 


§ 


55 BF 


C00405 




CALL 


CALC 




D5C2 


3E7F 




LDK 


A,7Fn 


3 


05C4 


B5 




DH 


L 


9 


D5C5 


6F 




MOV 


LtA 


05C6 


E5 




PUSH 


HL 


3 
■o 


D5C7 


DDEl t 




POP 


IX 




05C9 


2B 




DEC 


HL 


s 


35CA 


cacEDe 




CALL 


VLD3^ 


s 


05CD 


El 




POP 


HL 


1 


05CE 


7E 




LO 


Attun 


o 


05CF 


17 




RAL 




o 


55D0 


36*0 




LDK 


A." • Sh! 


3 


35D2 


13A1 »a575$ 




JR 


V3UT95 



;save cjrsDr_addr 
Scalculate BC 



;hl = last.nr ot this line 



;do move 

Jrestore cjrsor 

;get underline bit of this cHr. 

;into CY 

:change this chr to • • 

;exi t 



SO^CIM 803x assembler ver 3.5E <:/55/7= =9:92 Page 55 
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o 

o 

■o 

=. 0534 CiLC: 

2 JSjbroutine for use uith EDELC and EINSRT: 

® '^alcuiate #chr5 to tiove; if lUDve zero cTrst never rstjrn* 

CD 

S 3504 3E7F LOK A»VLL-1 ;4= Tiax »cnr 3 to be hovbJ 

J5D6 4D 
g- 35D7 C8B9 i C8IT 7,C ;C = coUcjrsor) 

3 35D9 91 SUB C ;A = Uohrs ta move 
* 05DA 2804 »D5E0$ JRZ : end :if -nove zero characters 
o 
•I 35DC 4F 

1 350D 0600 LD< 8,0 ;SC = *cnrs t3 mov= 
5 05DF C9 
O 
o 

I 35eo El send: POP HL ;trash return addr 

S °5E1 El POP HL Jcursor addr 

§ D5E2 188F »0573t 



LOK 


A»VLL-1 


MDV 


C,L 


C8IT 


7,C 


SUB 


C 


JRZ 


: end 


MCV 


C,A 


LD< 


8.0 


RET 




POP 


HL 


POP 


HL 


JR 


VOUT90 



o 

o 
3 



SO^CIM 80SX Assembler var 3.5E <:/55/7= =9:92 ?a9a 5S 
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05E4 ESCSCl: 

; ESC-Sequence processing. 

35E4 PSOC 

D5E4 3'=01 LDK &,EF_GR ;E5C-g 

D5E6 1806 *05EEt JR :125 5set graphics mode. 



D5E8 3E02 



35F4 SEFE 
35F6 





LDK 




JR 


ESCSH&: 


LD< 




JR 


5SCSUN! 


LD< 


:125: 


3R 


:130: 


STD 




JR 


ESCC3^: 


L0< 




JR 



&,EF_GR 




:125 




A.E'^.Hl 




S125 




fttEF.UN 




3 




AtESCH 




V0UT97 




A, .MOT EF. 


.5? 


:140 




ft. NOT EF. 


-HA 


:140 





;ESC-) S3t half intensity 



35EA 1802 "•OSEEt JR '125 ?90 set flag bit 

05EC 3E04 =5CSUN! LDt A.ti-_u«i ;ESC-I set jnderline 

55LE ao :125: 3R B 5Reg 3 is SSCH B/ts value 



35EF 3260EF :130: STD A.ESCH ;store desired vslje. 

35F2 1887 *D573S JR V0UT97 TExit 



;ESC-G Clear graohiCi node 
1806 *35Ftt JR = l'»0 '9° clear ESCH bit 

35F8 3EFD ESCC4A: LDK ft. NOT EF.riA ;ESC-( Clear naif intensity 
05FA 1802 »35FEt JR 

A. NOT EF.UN ;ESC-nri Clear jnderline 



35FC 


3EFB ESCCUN: 


LOK 


05FE 


AO :1*0: 


AND 


35FF 


18EE *35EFt 


JR 



S ;C Isar b i t 

:130 ;Go store ESCH byte 

051F ESCZZ: = VC.CLRS :ESC-Z Clear screen -sane as 

;Control-2 routine. 



o 

o 



O 

09 



O 

o 

3 

T3 
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3601 

0601 



ESCR^: 




;0s!3te 


Li ne 


ESCEi: 




;ins3rt 


Line 


:emt?y 




;hl 


=> cursor 


;c 


ahr 


;exit 




Iscreen 


updated 


:hl 


= new cu 



new cursor ..•to V0UT90 



o 0601 PROC 



0601 


COF606 


0604 


3E80 


0606 


A5 


0607 


bF 


D608 


E5 


0609 


29 


060A 


3AS2EF 


D600 


C613 


060F 


94 


0610 


E61F 


0612 


47 


0613 


3e52 


0615 


39 


3616 


78 


3617 


2823 *063C$ 



CALL UN_CUR 

LOK A,1030_ODODb 

AND L 

«0V L.A :do Ci? 

PUSH HL Jsave new ojrsor 

ADD HLtHL 

LD AtPIABD 

ADO A. 24 ;a = addr(25tT line) 

SUS H :A = lines to move + 1 

ANn OOOl.llllb Smod 32 

MDV BfA 

LOK A»VDELL 

CMP C 

HOV A,B ;recall alines to iiOKa 

JRZ :d3lt ;if deleting a line 

; Insert a I i ne 

;A = addr(25th I ins) 



0619 


84 




: insrt: 


ADD 


H 


D61A 


57 






HOV 


D»A 


D61B 


lEOO 






LOK 


EtO 


361D 


caiA 


$ 




RR 




361F 


CBIS 


i 




?^ E 




0621 


la 






DEC 


OE 


0622 


78 






MOV 


A, 3 


0623 


Z180FF 






LDK 


HL.-VLL 


0626 


19 






ADO 


HL.DE 



3627 1806 *362F$ JR :istrt 



;shi ft right DE 

;0E = addr ( I 3t_cnr _on_lst_l i ns) 

; A = *1 i nes to move 

5HL = addrCI ins above 3=) 

5DE := DE or FooOhS ^L := HL or FOOOh 



3629 


D5 


:icont: PUSH 


DE 


362A 


DDEl 


i PCP 


IX 


362C 


CDCE06 


CALL 


VLDD^ 


062F 


:05206 


:istrt: CALL 


:vmod 


3632 


20F5 "0529$ JRNZ 


:i cont 



jTiove 1 line down 

;if Tiust tiove Tiore lines 
3634 23 INC HL ;HL => Ist cnr of new line 



o 

o 
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O 

to 

a 



D635 






lexit: 






3635 


CQ61D6 






CALL 


CLI^LM 


D638 


El 






POP 


HL 


3639 


C37305 






JMP 


VOUT90 


063C 


31 




:d3lt: 


POP 


OE 


3630 


05 






PUSH 


DE 


063E 


218000 






LDK 


HL.VLL 


06*1 


19 






400 


HL.DE 


36*Z 


1806 »■: 


)6*A* 




JR 


:d3trt 


06*4 


D5 




: d^ont : 


PUSH 


DE 


D6*5 


DOEl 


$ 




POP 


IX 


36*7 


C0E206 






CALL 


VLon 


064A 


CD5206 




:dstrt: 


CALL 


:vinod 


36*0 


20F5 »l 


36**$ 




JRNZ 


idCOTt 


36*F 


E3 






EX 


SLiDE 


3650 


18E3 *1 


3635S. 




J« 


:exi t 



;recaver cjrsor 
;Main Exi t 



(recover naw cjrsor 



;hl = I i Te_&3l ow_Cjr son 



;mov9 1 I i Te uo 



;get addr of line to cisar 



o 



o 0659 82 
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0652 S"!^'^'^: 

;HL = HL or FOOOh; OE - DE or FOOOh 

• simjie Tiod-'fOgb arithneti: to keep pointers I^JSIO: vidaj nenory 

0652 F5 PUSH AF ;save A = #!ines to move 

D653 3EFD 

0655 B4 

3656 67 MOV H.A ;3et upaer nybl af H 

0657 3E!=0 



PUSH 


AF 


LDK 


&,OFDh 


OR 


H 


MOV 


H,A 


LDK 


A,DF0h 


OR 


D 


MOV 


D.A 


LDK 


BC.VLL 


POP 


AF 


DEC 


A 


SET 





% 065A 57 MOV D.A Smodulo 4096 

S. 0658 013000 

* D65E Fl 

9 065F 3D DEC A ;decrem9Tt lins.count 

5 0660 '9 
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0661 CL^LM: 

:CI ear to end of I ine 

;HL = Cursor 

:exiT 

:clear to EOL 

; Uses All. 



0661 PROC 



o 


0661 


3620 


-1 

o 


0663 


F3 


o 


0664 




1 


0666 


3580 


g 


0668 




o" 


066A 


FB 


3 


066B 


3A6CEF 




366E 


3D 




066F 


50 




3670 


cesB 




0572 


93 




0673 


u8 



STQ 


• '.thn 


DI 




ENADIM 




STO 


SRTBIT.CtI J 


DISDI<1 




= 1 




LO 


4,LLIM!T 


DEC 


A 


««0V 


E.L 


CBIT 


7,E 


SUB 


E 


RZ 





tC tear cjr sor ... 



;3et cursor 3RIGHT 



;inax_*cols => naxi nun.col _» 

;A = col!=3L) - :oH:ursDr) 
;if BEOL. done 

357* 3004 *367A$ JRSC 12 !if inside I ogi cal _vi deo_l i ne 

0676 3E80 

3678 93 SUB E ;...else cir to end of 123-CTr line 

0679 C8 RZ !if cursor 3 loluin *127 

367A 4F :2: 

0673 0500 LDK 3.0 ;3C = chrs to mo^e 

0670 E5 

367E ODEl i 

3580 0023 t 

3682 leSE *'36E2t 



LDK 


A.VLL 


SUB 


E 


RZ 




HCV 


C,A 


LDK 


3,0 


PUSH 


HL 


POP 


IX 


INC 


IX 


JR 


VLOn 



o 

o 
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0634 



DQ.LF: 

103 L i :ie Feed processing 

;entry 

SHL = cursor addr 



o 



o 



;exit 

JCjrsor cleared 

SHL updated for current cursor pos 

iwindow Ttoved if necessary 



0684 






PR DC 




D6S4 


CDF606 




CALL 


UN. CUR 


0687 


E5 


Da_LF2: 


PUSH 


HL 


3683 


013030 




LOK 


BC.VLL 


068B 


09 




ADO 


HL.e: 


D63C 


3004 "3692S 




JRNC 


snowap 


a68E 


OlOOFO 




LDK 


BCFWAVH 


0691 


09 




ADO 


HL.BC 


3692 


E3 


:n3waD: 


XTHL 




0693 


29 




ADO 


HL.HL 


0694 


3A52EF 




LD 


A.PIA3D 


D697 


CS17 




ADO 


A, 23 


0699 


94 




SUB 


H 


069A 


E61F 




AND 


OOOl.llllb 


069C 


2802 »3S40$ 




JRZ 


! VDOV 


069E 


El 


:8id: 


POP 


HL 


069F 


C9 




HET 




06AO 


3A6CEF 


:vmov! 


LD 


A.LLIMIT 


06A3 


CB30 $ 




SRL 


L 


0645 


95 




SUB 


L 


36A6 


38F5 »D69E$ 




JRC 


:end 



;clear cjrsor 

;save original cjrsor 
; I ine length 

;if not rtfapoing froTi LWAV^ to FWAVH 



;hl = new cursor 3 top of VH 

Jsava ne«i cjrsort get old 
Sshift HL left 

Jstart + 23 = I ast.vi deo.l ine 

•A = t_line - curr_li?i2 

Smodulo 32 

Sif cursor is on 24ti li ie of screen 

;get new cjrsor 



;unshi ft L register 

;a = LLIMIT - coiCjrsor ) 

•if cursor is outside logical line 

Scjrsor is on last line of screen? inside of logical line. 
;must move screen to follo<i cursor down throjgrt i^ideo nenory. 



06A8 


El 


36A9 


E5 


36AA 


3E80 


06AC 


45 


36AD 


5F 


36AE 


CD6106 


0681 


3A52EF 


0684 


47 


36B5 


E6E0 


06B7 


4F 


0638 


3E1F 


36BA 


04 


0683 


40 


36BC 


32EFEF 


06BF 


Bl 


06C0 


4F 


36C1 


CO85O0 


06C4 


El 



9<ZP 


HL 


PUSH 


HL 


LDK 


A,30h 


AND 


L 


MDV 


L,A 


CALL 


CLRL»4 


LD 


A,PI43D 


MDV 


8, A 


AND 


not 31 


MOV 


C,A 


LDK 


4»31 


INC 


3 


AND 


B 


STO 


A.VRTOFF 


DR 


C 


MOV 


C<A 


CALL 


DP8D 


POP 


HL 



;HL = beginning of line 
;erase to =0L 



I Ine zero 
house<eeping oits 5. .7 



; i ncremeit I i ne* 

;A = I ine* 

;SET VERTi:4L DFFSET FDR C OUT 

;a = new linaS QX io jsjoepi ng_bi ts 

;C = new vajje for O'BD 

.move video screen dowi 1 line in memory 



o 

o 



SO^CIH S08x Assembler ver 
Keyboard and Console Routines. 



3.5E <!/55/7= 



=9!92 Page 62 



36C5 C9 



il5T 






O 
o 
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O 
o 

■D 

3 ;STORS THE CnNTE«JTS 3= T-tE S REG I M THE 4DDR PQIMTED TQ 3Y THE HL PAIR 

• :eMT^Y 

g ;B = VALUE 

N ;hl = aooREss 

o 

CD 

§■ :exit 

3 SNDNE 

w 

o 06C6 PROC 

■o 

DI 
„ ENADIM :ENA3Le DIM 

o 06C9 70 STO BttHL] ;STDRE 



06C6 


F3 


06C7 




06C9 


70 


CI6CA 




D6CC 


FB 


D5CD 


:9 



5IS3IM ;OISABLE 0I»< 

EI 

RET 
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Keyboard aid Console Routines. 



3:R3M1<H ,\%'^ 



3. 

3 
e 

1 


06CE 




VLOO^: 

JVidso Block Howe 

;BCt IXt HL set 


ro 

o 

i 






:exit 

;LDD^ on mai n 
; Uses 


£ 


9th bit Tienor 
BC, DE, iL.IX 


9 

i 

•o 


D6CE 
0600 


DOES 
01 


$ PUSH 
POP 




IX 

DE 


1 

O 

5 


0601 
0602 
06D3 


C5 
D5 
E5 


PUSH 
PUSH 
PUSH 




ac 

DE 
HL 



5604 



EDB8 



LOD^ 



;mai n uianory 



3606 


El 


0607 


Dl 


D6D8 


CI 


0609 


F3 


06DA 




36DC 


ED 


06DE 




06EO 


FB 


06E1 


C9 



POP 


HL 


POP 


DE 


POP 


BC 


DI 




EN4DIM 




LDD5. 




OISOIM 




El 




^ET 





;9th bit T)»tnDry 
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O 



o 
O 

o 

3 



O 

o 



D6E2 aOE5 

06E4 01 

36E5 C5 

36E6 D5 

06E7 E5 



I- J * > • 

Vidso SlocK Mova 

ENTRY 

BCt IXt HL set 

EXIT 

L3J? on mail t. 9th bit neiiory 
Jses 3C< OEf HLtlX 



PUSH 


IX 


POP 


DE 


PUSH 


BC 


PUSH 


DE 


PUSH 


HL 



36E8 EDBO 



LOIR 



;!nai n msiiory 



D6EA 


El 


06E3 


01 


[)6EC 


CI 


36E0 


F3 


96EE 




36F0 


ED 


D6F2 




06F4 


FB 


96F5 


:9 



POP 


HL 


POP 


DE 


POP 


BC 


DI 




ENAOIM 




Lon 




DISOIH 




EI 




RET 





!9th bit Tismory 



o 

o 



(D 






§ 


06F6 


7E 


•D 


36F7 


17 


C 


36F8 


JF 


? 


06F9 


IF 


9 


D6FA 


77 


i 


[)6FS 


:9 
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06F6 UN.CJRs 

;UTdo/Invert Cjrsor 

;HL = cursor_addr 

:iXIT 

;cjrsor invertsd 

; Uses A, cr. 

LD AithU ;3et the cnr 

RAL ;cursor_3it => Zf 

CMC ;inv9rt it 

»AR 

STO AiChl] ;... 

RET 



o 
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06FC 



5KEY: 

:KEY304RD interrupt P*aCESSO» 

JENTSY 

5NDNE 



O 
o 

3 
■a 



O 
o 

■a 
o 

o 



36FC 



SEXIT 

{KEYBOARD PRQCESSING DONEt RESULT IN LDHEY. 



PROC 



D6FC 


F3 




DI 




D6F0 


ED73SFEF 


$ 


STQ 


SP,IESTK 


0701 


3199EF 




LDK 


SP,ISTK 


0704 


F5 




PUSH 


AF 


3705 


C5 




PUSH 


8C 


0706 


05 




PUSH 


DE 


3707 


= 5 




PUSH 


HL 


D708 


DOES 


% 


PUSH 


IX 


370A 


FOES 


i 


PUSH 


tY 



ISAVE INTERRUPTED PROCESS ST< 
;SET TO ^AM INT ST< 



;SAVE ALL ^EGESTBRS 



SRDutine cnecks to ses if the disk drive TiDtor stojIJ ba tjrnsd off by uodating DA:TIVE...?o jti ns ALSO 
;chet;ks to see if bell is currently ringing: if 30» decrsusTt counter. If cojnter turns 2ero» 
;siut off bell. 



Seel I =zero ? 

5 i f be I I now off 







;CHecK 


3ELL 


070C 
07OF 
3710 
3711 


216SEF 

AF 

86 

280C *071F$ 


LDK 

XOR 

OR 

JRZ 


HLtBELCMT 
A 

:l 


0713 
071* 


35 

2009 *071F$ 


DEC 
JRNZ 


thn 

:l 



•...bell is on. decrenent counter 
;if bell siojld stay on axnile yet 



;TURN SELL OFF 



0716 


3A62EF 


LO 


A,PIABD 


3719 


ESDF 


AND 


llOl.llllb 


071B 


*F 


MOV 


C.A 


071C 


CD8600 


CALL 


OPBO 


071F 


2S :l: 


DEC 


HL 


0720 


7E 


LD 


A.Chll 


0721 


57 


OR 


A 


3722 


2804 •3728t 


JRZ 


:2 



• cl Bar 33l I 3i t 



;hl 



HL - 1 D&CTVE 



SRETURN if inactive 
TUR^i DRIVE OFF IF DACTVE = 1 



0724 


35 


DEC 


Chi] 


0725 


CC060F 


cz 

;UPDATE COUNTER 


ODRV 


3728 


2ACCEF 


:2: LD 


^L,SEQ 


0728 


23 


INC 


HL 


072C 


22CCEF 


STO 


^L»SEQ 



;reset delay 

• i f desel ect dr i ve 



;GET low TWO 3YTES 

: + l 

;STORE 
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;ReAO KEYBOARD 

072F 3A59EF LD AtKEYLCK 

0732 B7 on A 

3733 !:'i-4E07 CNZ KSDRV^ ;REAO KEyB3A*D IF <EY'L3C< NOT ACTIVE 

;E<it interrupt code via exiting to RAH and tnan anaDls 3r disable ROM code depending on the vilje 
;contained in ^OMRAM cell. 

'clear interruot 

;IS ROM IN Oi OUT? 

;if return ts SA^I 

SRESTORE REGESTEilS 



(D 

o 


0736 


3A002C 




LD 


AtH.VIO 


o 

3 


3739 


3A08EF 




LD 


A.ROI^AH 


c 


373C 


37 




OR 


A 


? 

o 


D73D 
37*0 


C29300 
FOEl 


i 


JHZ 

POP 


ROMJPl 


1. 


37*2 


DOEl 


i 


POP 


IX 


07** 


El 




POP 


HL 


07*5 


01 




POP 


DE 




37*6 


CI 




POP 


BC 




07*7 


Fl 




POP 


AF 




37*8 


ED7eSFEF 


i 


LD 


SP.IESTK 




07*C 


FB 




EI 






07*D 


C9 




RET 





;get users sta;k bac^ 
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This file contaiis the Z-Key roll Dvar ksybaard Jrivar for 
the 3S30^NE 1 conuter. 



o 

o 

3 



O 
o 



Author : 

^licrocoie Carporation. 

Fre.Tiont. CA. 

Y. N. Sahas 

September 1981 

"avi si ons: 

Z-<.3y roll over <eyboard driver. 



CESC!?I 

ever y 
<ey is 
in tT9 
the sc 
on. it 
the We 
be ser 
tie '<3 
I ist j 



ption; 
yboard d 

15 TIS. i 

f oundt 
keyl ist 
an. the 

is pi ac 
ynjTiber. 
vipsd ag 
V will r 
s not on 



rii/er gets control via ths S3hz interrupt, i.e. once 
t scans tne keyboard to detect any strjck keys. If a 
it is entered into tie keylist if there is soace 

aid the key is not already in ths list. At the end of 
keys in the list are oroecassed. If tha <ey (s still 
ed IT Ikey < or special aotioi ta^ei) aftar translating 

A count is also stored in the list and the key will 
aih at the end of this count if it is still on. Thus 
epeat if it is held do^n. If a key wiich is in the 

it is removed froti thj list. 



The keyboard driver consists of the following rojtines: 

ODS'i/R - Exanines the keylist. calls C-<KEy ta deterrnina if key 
is still on. Removes the key fro-n the list if it is not on. If 
<ey is or\, it decrenents the count associated with the key. when 
the count goes to zero, it calls <3Sr?V to S2rvi:e the key. Calls 
<S3CAN to enter any new keys into the list. 



<6SC4N - This routine scans the oyboard. detects 3 struck 
<ey and enters it into the keylist. Tha key is entarad 

key is njt already creseht in the keylist 



into tne key I i st if the 

and there is ar\ anoty slot in the »^3ylist. 



KBSE^V - It calls the routine CHK.EY to cneck if shift/ctl or alphlDC< 
keys are on. It then translates ti2 <3ynjiioer into the ASCII 
code and places it in the LKtY for tne C3I3S to -ead. =or sone 
special cases, it calls ?Q>< resident routines to process the kay. 



CH<EY 



It checks if a given key is on. 



Data structure; 

The Tiain structure used is tie kjylist. Ths format of each entry is: 



3yte 0: 



3yt9 l! 



bit 7 : Set indicates entr/ is in jsa. 
bit 6 ; Set indicates key has oeen serviced once, 
bits 5. .3 : contain the re* hjiiber of struck key. 
bits 2. .3 : contain the coluiin njmoer of strjck key. 

bits 7,, 3 : contain the raoeat count for tie ^ay. 



o 
o 
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■5 3746 K9DSIVR: 

§ ;OeT=CTS AND PilOCESSES KEYSTROKES. 

- :n3ne 

00 

10 

o ;exit 

CT ;lk=y = <ersTROKE 

o 

» 37<>e PROC 

o 

3 37'>E CD36D7 CALL KSSCAN ;SCAN KEVaOA?':! AMD £^7 = ^1 <EYS niO <EYLIST 



O 
o 



0751 


213*5F 




L0< 


HL,<EYLST 


375* 


0603 




LCK 


3.ICL_LEN 


3756 


3A5EEF 


:l: 


LO 


A,LKEY 


0759 


37 




CR 


a 


375A 


CO 




IHl 




375B 


7E 




L3 


A,CHL1 


375C 


C87F 


s 


BIT 


KL USED,* 


375E 


2B21 * 


0731$ 


jaz 


:5 


0760 


C0E207 




CALL 


CHKEY 


37 63 


JOCt - 


3759S 


JRSZ 


-.2 


3765 


3603 




ST3 


O.CHL] 


3767 


1318 * 


0731S 


JR 


:5 



;EXA«UNt KEYLIST. IF «; = Y FOJNO IN KEYLIST, C5LL CHCE/ TD SEE IF <£Y IS STILL 3H. REiaVE FR3H LIST WHEM NOT OH. 

;POINT TD ^nST ENT^Y 3F <EYLIST 



;RETURN iIH?M a key is WAITING IN L<EY 

;GET BYTE 3F ENT^Y 

;IF ENTRY IS IH USE THEM 

;CHeCK 11= STILL 3N 

;IF <EY IS N3W 01== ■^^E>< 

;RE?<0VE <EY FR3M LIST 

;KEY is on. DECREMEMT its repeat count. J'^ COU^T GDES T3 lERT T^EN IT IS TI1E TO SERVICE THE KEY. 

:SSV: OTR TO FIRST 3fTE jF ENTRY 

:point td rfdeat count 

:EXIT when N3T time 13 SERVICE THE KEY. 

it is TIME TO SERVICE THg KEY. SET THE NEXT REPEAT COUNT 

I'DINT 64CK TO THE FIRST iYTE 3F ENTRY 

ICHECK 1= IT IS SERVICED 3E'=3RE 

;SET THE SERVICED 3NCE F.4G 

:pOINT 5AC< T3 the REPEAT COUNT 

:AND STORE R'T CDUMT AS 'ER SERVICED FLAG 



3773 E63F :J; IND KRO)<_!H + KCC)L_M 

3770 COO9313 CALL KBSERV SCALL TO SERi/ICE THE <EY 

37B0 El 54: POP HL :GET otr T3 ei?ST 3YTE QF ENTRY AGAIN 

3781 :5: 

ECHO KLE.LE'il 

INC HL ;?OINT TO NEXT ENTRY 



0769 


E5 


:2: 


'USH 


HL 


075A 


?3 




INC 


HL 


3763 


35 




DEC 


[HLl 


376C 


2012 


»0730S 


JRNZ 


•.<t 



0756 


E3 




EX 


[SPI.HL 


376F 


7E 




LD 


A, [HL] 


3770 


C877 


i 


SIT 


KY_SRVD,J 


3772 


CBF6 


i 


SBIT 


KY.SRVO. [HL] 


077* 


E3 




EX 


CS?],HL 


3775 


3618 




STD 


IRBTCT.CHLl 


3777 


2802 


»37?3S 


JRZ 


:3 


3 779 


3506 




STD 


SRPTCT,CHL5 



9 

o 



f> 

o 

3 



O 
o 



SO^CIM S03x Assembler ier 3.5E <:/55/7= =9:92 Pia= 71 

tEYBOA^D S:&'4NING E OECQOE B:ROMl«.l '.&SX 

3783 lODl *3756$ OJNZ U 5UNTU C3MPlETE LIST SC4MNE3 

3785 C9 RET JRETURN 



SO^CIM aOSx Assembler >^er 3.5E <:/55/7= =9:92 Paga 72 



O 
o 



iCEYBDARD SCANNING t DECODE 



3:RDMl'tl .4S>f 



0786 



? 












3 








3786 




O 






3 
■a 


3786 


ZEFF 


c 
a 


0788 


CD0008 


O 
o 


0788 


C8 






1 


078C 


2E81 


0> 


078E 


CD0008 


7i 






o 






3 


D791 


E5E3 




0793 


0607 



KBSCAN: 

SSCAN KEYBDARO AMD ENTER DETECTED KEYS I »4 THE <EYLIST. 

:estry 



CONTAINS ANY KEYS DETECTED. 

;SEE IF ANY <EY PHESSiJ 
;RETURN rfHEN NDNE 

;get row 



;n3ne 






;exit 


;keylst 

PROC 


CI 




LOK 

CALL 

RZ 


L.OFFH 

RDROW 




LDK 
CALL 


L.ROkO.M 
RDROM 




AND 
LDK 


moDoiij 

B.TOT.RQi* 



:REH0VE CT. /SHIFT AND AL'HA LOCK 



;1N THIS LOOP. RE3 B CONTAINS TOTROW CURRENT ROW BilNG S;ANNED 



0795 


28*3 


*D7DAS 


0797 


C5 




0,7 9 8 


5F 




0799 


3E07 




079B 


90 




0790 


17 




079D 


17 




079E 


17 




D79F 


57 




07A0 


OEOO 




07A2 


CB3B 


t 


07A4 


302E 


'■07D4* 



JRZ 



:8 



PUSH 


BC 


HDV 


Ef A 


LDK 


A.TOT.RO^ 


SUB 


B 


^AL 




RAL 




RAL 




MOV 


D.A 


LDK 


CO 



;IF ANY «£Y IS PRESSED T-IEN 

;SAVE LOOP COUNT 
;E = COLUMNS 



;D = ROW NJH3EI » B 
:INIT1ALIZE COLUMN COUNTER 



;S:AN this row from RISHT to left to get the COLUIM NJ<13E* 
:2! 



SRL 

JRNC 



:SHIFT C0LJ.1N BIT INTO CARRY 
;IF A KEY IS FOUND THEN 



;ENTER T^E <EY whose COLJUN number is in C and RDW»8 is in INTO THE KEYLST PROVIDED THE KEY IS NOT 
SALREAOY IN LIST AND THERE IS AN EMPTY S.OT IN THE LIST. 



07A6 


7A 






MOV 


AtO 


07A7 


81 






ADO 


A,C 


07A8 


C5 






PUSH 


BC 


07A9 


tF 






MOV 


C.A 


07AA 


D5 






PUSH 


DE 


07AB 


£5 






PUSH 


HL 


07AC 


0603 






LDK 


B.KL.LEN 


D7AE 


21D*EF 






LDK 


HL, KEYLST 


07B1 


110000 






LDK 


DEtO 


0784 


7E 




;3: 


LO 


A, tHLl 


0785 


CB7F 




t 


BIT 


KL.USED.A 


07B7 


2807 * 


07C 


;os 


JRZ 


;* 


07B9 


E63F 






AND 


KR0W_MtKCOL_M 


07BB 


39 






CMP 


C 


078C 


2813 » 


0701$ 


JRZ 


:6 



:C = KEY NJMBE? 

;SAVE DE 

;SAVE HL 

;LENGTH of K5YLIST 



;IF ENTRY IS USED THEN 

;CHECK WITH CURRENT KEY 
SEXIT IF THIS KEY IS IN LIST 



o 

o 



SORCIM 8D8x Assembler ver 3.5E <:/55/7= =9:92 Pags 73 
<eYBDAX5 SCANNING £ DECODE 3:R3M141 .4SH 



D7BE 1802 *37:2$ 



JR 



a> 
O 



O 
o 



D7C1 54 



07C2 



:5s 



37CA lOEE "3754$ 



WUV 
MOV 



ECHO 

INC 

ENDM 

DJNZ 



fc»L 

DtH 



KLE.LEfJ 
HL 



:ELSE (AM EM'Ty ENTRy IS FOUND) 
;SAVE ADRS OF EMaTf ENTR*^ IN Or 



;next entrv 

;TILL LIST SCANNED 



;CHECK IF AN EMPTY ENTRY WAS FOUND. 



D7C6 7A 

07C7 37 

D7C8 2807 "3731$ 

07CA EB 

37CB 71 

37CC C8FE $ 

07CE 23 

37CF 3601 

0701 El :6: 

3702 Dl 

0703 CI 

0704 DC :7: 
37D5 AF 

07D6 86 

07D7 20C9 *07S2$ 

0709 CI 

37DA CB25 $ :8: 

37DC CD0008 

370F 1084 *0795t 



HOV 


A,D 


OR 


A 


JR7 


:6 


EX 


DE.HL 


STO 


CttHL3 


SBIT 


KL_U5ED, tHL] 


INC 


HL 


STO 


D3_CT,CHL] 


POP 


HL 


POP 


DE 


POP 


BC 


INC 


C 


XOR 


A 


CMP 


E 


JRN2 


:2 


POP 


BC 


SLA 


L 


CALL 


RDROW 


DJNZ 


:l 



;IF EMPTY ENTRY WAS =0tJN3 THEN 
;HL = EM'TY ENTRY 

;store t^e sey in the list 
;set used flag 

sstdre de30unce delay 

;restdre all regsters 



;iNCREMeNT column nj^ber 

;until all columns scanned 

:rstore 3c 

;move to next roa 



07E1 C9 



ret 



SO^CIM 80Sx Assembler ver 3.5t <:/5^fl= =9:92 Pags 7* 
<EY8QA5D SCANNING E DECOOE 3:RDM141 .4S« 

O 
o 

■D 

=. 37E2 CHKEY: 

3 :checks if key njmse^ is on. 

8 :ent^y 

£ ;A = KEYNJM3E? 

S ;exiT 

O II CLR = KEY IS O^F. 

g^ ;Z SET = KEY IS ON. 

^ 07EZ PROC 

o 

SSAVE CALL-?5 HL 
;SAVE KEYNJiaEl 

;right JUSTIFY a3W njmse? 

;get key njisc? 

;save rd^ mask 

;get col has< teat njh is in 3ITS 0..2) 

:HavE !^aw mask la l 

:get jdw 3f ^eys ad^se3 by l 

:Z IMD = VALUE 3E <ey 

HL 

07F5 C9 ilET 



07E2 


E5 


07E3 


F5 


07E4 


IF 


07E5 


IF 


07E6 


IF 


a7E7 


C0F607 


37EA 


Fl 


07EB 


D5 


D7EC 


C0F&07 


07EF 


El 


07F0 


:ddoo8 


D7F3 


A3 


D7F4 


El 



PUSH 


HL 


PUSH 


AF 


RAR 




RAH 




RAR 




CALL 


GTHASK 


POP 


AF 


PUSH 


DE 


CALL 


GTMASK 


POP 


HL 


CALL 


RD^OH 


AND 


£ 


POP 


HL 



o 



o 

o 

3 

T3 



O 

O 



iu:<i,in OUBX SSsembrer vsr 3.5E <:/55/7= =9:92 Pag^ 75 
'CEYSOAIIO SCAMNINS £ DeCODE 3:R3H14l .4S1 

37F6 GTHA5K: 

;gsnerates mask with one bit set- 

SEMT^y 

;a = bit njmber to. .7) 

;exiT 

?E = MASK 

07F6 PROC 



07F6 


lEOl 




LDK 


E,l 


D7F8 


E607 




AND 


7 


37FA 


:8 


51: 


RZ 




37FB 


:B23 


$ 


SLA 


E 


07FD 


3D 




DEC 


A 


37FF 


13FA 


•37FA$ 


JR 


:l 



o 

o 



SQUCIM SCSx Assetnblar \^9r 3.5E <:/55/7 = 
KEYSDAI^D S:AMNING E OECOOE 



=9:92 Pags 75 
BtR^Ml-H .ISM 



0800 



RD^Oi*: 

:reaos a '?oh of keys 
:E'aT^Y 

;L = LOWER B 3ITS OF 4D^S T3 RE4D HE S.3W 



;E>!IT 

:a 



ROW VALUE 



0300 



0800 


2622 


08D2 


70 


D803 


EOifF 


0805 


7E 


0805 


EEFF 


0808 


C9 



PROC 



LD< 


H,HIGH(H.KEY) 


MOV 


A.L 


«IOV 


R.A 


LD 


A.CHLl 


XOR 


OFFH 


RET 





:hl 



PRT 4DIS FDR GIVEN ROW 



mVERT VALUES 



o 

o 



O 



O 



SO^CIM 803x issembler ver 3.5? 
KEYBOARD SCANNING £ DECODE 



<:/55/7= =9:92 Pags 77 
3:R0K141 .4S« 



008D 


LFT_ARW 


= 


80H 


OQSS 


RT.ARN 


= 


3BH 


30SA 


JP AlH 


= 


8AH 


ooec 


3N_A?W 


s 


8CH 


0053 


HH SCRN 


= 


•[• 



D809 



0809 



KBSE^V: 

;SERi/ICES THE <E¥ 

;emt*y 

;A = KEYNJM3E? 

usp]-* = pointer to keylst entry (used for slioe 

;exit 
;n3ne 

TP^ESERVES REG B 

PR DC 
5SETU? HL TO POINT TO KEYC3DE T&3LE ENTRY FDR THIS KEY 



;USEO HEIE A'JD LATER 



ONLY) 



0809 


5F 




MOV 


EtA 


080A 


1600 




LOK 


0,0 


080C 


210408 




LDK 


HL.KYCOTB 


080F 


19 




ADD 


HL»DE 


D810 


7E 




LD 


A.tHLl 


0811 


FE21 




CMP 


• '+1 


D313 


381F » 


DS3*$ 


JRC 


KEYE 



0815 F5 



0816 
0818 



2E01 
CD0008 



081S F5 



PUSH 



LOK 
CALL 



PUSH 



AF 



L.l 

RDROH 



UGNORE SHIFT/CTL ETC =01 CHARS LESS THAN 2H 



;R0H AORS 

;GET row containing CTL, SHIFT 4ND ALPHA KEY 



AF 



D81C 


2E80 




08ie 


C00008 


0821 


E603 




0823 


5F 




082* 


Fl 




0825 


B3 




0826 


5F 




0827 


Fl 




D828 


CB53 


$ 


332A 


202E 


»035At 


0820 


CB53 


S 


D82E 


2014 


•0844J 


3830 


CB58 


$ 


3832 


2004 


*0838t 



LDK 


L,80H 


CALL 


RDRQW 


ANI 


8 


MOV 


E,A 


POP 


AF 


OR 


E 


MOV 


E,A 


POP 


AF 


BIT 


CTL_KY,E 


JRNZ 


KEY4 


BIT 


SHFT_KY,E 


JRNZ 


KEY2 


BIT 


ALPH.KYtE 


JRNZ 


KEYl 



;restore keycode 
;gq process ctl key 
:go process shift key 
;go process ilpha key 



;fall through to "keye" 



o 

o 



SQi^CIM 808x Assembler vsr 3.55 <:/55/7= =9:92 Pjge 78 
CEYBOA^D SCANNING t. DECODE 3:R2H141 .4S"1 



O 
o 



3834 



KEYES 

SSTORE KEY CDOE INTO "LKEY" AND RHTURN 



IS 


0834 


325EEF 


Q 


0337 


C9 



ST3 

RET 



A. LKEY 



o 

o 



o 

o 
3 



SO^CIM 80Sx issemfaler i/er 3.5E <!/55/7= =9:92 Paga 79 
KE¥3QAi?0 SCft»)>JING t DECODE ?:R3H141 .ISH 



0838 




<Eri: 






3838 


FE&l 




CMP 


•a' 


383A 


3SP8 


.*333*t 


JRC 


KEVE 


383C 


FE80 


:27: 


CMP 


30H 


3835 


30F4 


'D334S 


JRNC 


KEYE 



0340 EE20 :28: 
3342 18F0 *3S34$ 



XOR 20H 

JR KEYE 



iP'^GCPSS 4' ?HA KEY 

:EXIT when less than 'a'. 4L'H4 HAS NO EFFECT 

;0R WHEN >= 30H 

;fold char td 'jp^e^ case 



o 
o 

-^ 

o 
o 



o 

o 



SO^CIM 303x Assembler vsr 3.5E <:/55/7= 

<£ya34R0 S:ANNI^JG E DECODE 



=9:92 Pags 8D 



03*4 






<.Ei2: 






D8*4 


FE51 






CMP 


•a' 


3846 


30F4 


*383Ct 




JRNC 


:27 


0848 


FE53 






CMP 


•[• 


D84A 


3806 


"0852$ 




J<C 


KEY3 



3S4C 20F2 "38401 



JRNZ 



:28 



SPRQCfSS SHIFT KEV 

;GOTa AL'HA WHEN CHA^ > 'a' 



;GDTa PRDCES3 SHIFT NJ»1E?ICS ETC 
UNVS^T SHIFT SIT -UK '\' 



n 

o 

3 



384E 3E50 

3350 18E2 »3834$ 



LDK 
JR 



A.']' 

KEYE 



JCONVERT C T3 ] 



a 
o 



SO^CIM eOSx Assemblsr ver 3.5E <:/55/7= =9:92 Pags 31 
<Er30&^0 SC&MNING E DECOOE 3:R0M141 .45^ 



D852 



KEY3: 

••CHA^S • T3 > (ASCII C3DSS 27H TD BEH) A^E CDMVE^TED USlXt 

;THE SHFT_T3. 0=0 F^DH 3EF3RE 



o 
O 



0852 


5F 


D853 


21=503 


3356 


19 



D857 7E 

3858 ISDA »3834S 



<Ey3A: 



HCV E,A 

LOK HL,SHFT_T3 - '•'■ 

ADD HL.OS 

LO AtCHL] 

JR KEYE 



o 

o 



SO^CIM 3Dax assembler ver 3.5E <:/55/7= =9:9? Page BE 
< = YBaAi?D S:ANNING t DECODE 3:R3M1'H .4SM 

085A KE1f4: 

;PHDCESS C3NTR0L KEY 

;IF CHAR IS BETWEEN A..Z THEN TURN OFF THE 3 HIGH aR3E? 

SBITS. 

;if char is between 't'..'?' it is translated as per ta3le ctl.tb* 

;if char is the arr3w kefs or the •]•/•[' <.z<f the slide =uscti3ns 
;are called. 



O D85A FE8D 

o 

3 

T3 



I 385C 2833 •3391t 



D85E FE8B 

D860 2333 *0895t 



3862 FE8A 

0864 2840 »D3A5$ 



0866 FEBC 

3868 2340 *D8AA1 



D85A FE53 

386C 2850 '■083Et 



386E CB63 S 
38T0 2803 "DSTAS 



3872 FE2F 

3874 2004 *D87At 



0876 3E7F 

3373 138A *3834J 



CMP 


LFT_ARM 




JRZ 


slioel 




CMP 


RT.ARW 




JRZ 


SLIDER 




CMP 


JP.A^W 




JRZ 


SLIDEU 




CMP 


DN.4RH 




JRZ 


SLIDED 




CHP 


HM SCRN 




JRZ 


D0H0«1E 




BIT 


SHFT KV.E 


;test for :ntl shift 


JRZ 


KEYS 


;IF NOT 


CHP 


•/• 


;is IT ? 


JRNZ 


KEYS 


;IF NOT •?• 


ldk 


4,07FH 


sdeleat <ey 


JR 


KEYE 





SO^CIM 303x Assembler vsr 3.5E <:/55/7= =9:92 Page 33 

IcerBOAUD SCANNING t DECODE BsRQMl*! .4S"1 

087A <EY5: 

037& FEiO CMP '3' 

387G 3808 »0886S JRC KEY6 ;GOTO TRANSLATE CHARS FK3H TABLE 

087E FE7S CMP 'z'+l 

J880 30B2 «0834t JRNC KEYE 

3382 E61F AND IFH 

3884 ISAE »D834$ JR KEYE 



SO^CIM 808x Assembler ver 3.5E <:/55/7= =9:92 Pags 3* 
KEVBOftilD SCANNING t DECODE BrRDMl*! .4SM 



SNO TRANSLSTION IF CHA? iELOW •.' 



o 












<o' 


3886 




ICEY6: 






3 


0886 


FE2C 




CMP 


•♦' 




3888 


38AA •383<tt 




JRC 


KEYE 


aasA 


Z1F808 




LDK 


HL,CTL_T9-',« 


o 


38BD 


5F 




HOV 


EtA 


o 
o 

o 


588E 


19 




ADD 


hl,d; 


388F 


18C6 "•3857t 




JR 


KEY3A 



;0=0 FR01 AB3VE 



o 

o 



O 

o 

3 



SO^CIM 803x Assemblsr ver 3.5E <:/55/7= =')i'id Pigs B5 
KEYSQA^iD SCA^^NIN3 t DECODE B:R3M141 .ASH 

:SLIDE !=UNCTIO'^S. 



0891 
3393 


oeo2 

1302 * 


0897$ 




LOX 
JR 


C,2 
SLRl 


0895 
0395 


OEFE 




SLIDER: 


LDK 


Ct-2 


397 

D89A 
039B 


3A61EF 

31 

4^F 




SL^l: 


LD 

ADD 

MOV 


AtPIAAD 

A,C 

C,A 



;gcT horizdmtal cddro. 



089C C07900 CALL OPAD :FUNCTI0'4 PIA 

;SET REPEAT COUNT FQ? THESE <EYS tOVERSnE COUNT SET 3Y THE K3DRVR) 

339F 01 SL^2: POP DE JGET RETURN AD^S 

33A0 El POP HL SPOINTER TO REPEAT cNT^Y 

03A1 3603 STO SLD_*CT,tHLl ;REPEAT COUMT F0^ SLIDE CEYS 

03A3 E5 PUSH HL 

08A4 05 5USH DE :^ESTORE STACK 

08A5 C9 RET 



SO^CIH 808x Assemblar i/er 3.5t <:/55/7= =9:92 Pjgs 86 
tEVB34R3 S:4*JNING E DECODE BxROMl*! .^S'^ 



■5 


D8A5 


DEOl 




SLIOEU: 


LDK 


C.l 


3- 


03AB 


1802 • 


08ftC$ 




J^ 


SLOl 





08A& 


OEFF 




5LIDED: 


LDK 


Ct-1 


o 


08AC 


2162EF 




SLDl: 


LOK 


HL.PI&BD 




08AF 


7E 






LO 


S.tHL] 


o 

3 


08B0 


81 






ADD 


A,C 


o 


D8B1 


E51F 






AND 


IFH 


Q 


0883 


*F 






MOV 


C,A 


3 


3884 


7E 






LD 


A»[HL3 


c 
a 


0835 


E6E0 






AND 


OEOH 




0887 


31 




SLD2: 


OR 


C 




0888 


*F 






HGV 


C,A 


§ 


0889 


C08600 






CALL 


0P8D 


". 


083C 


18E1 * 


389FS 




JR 


SLS2 



:herge new ve^toffset ra lower 5 bits of piaj 



:mooify cu^re'jt .jith ti/o^-i 



o 

o 



SO^CIM aoSx AssembSer 
<EY8aA^0 SCANNING t DECODE 



38Bt 



DOHQUE: 



3.5E <:/55/7= 



=9;92 pjge 37 
8:RaMl*l .ASH 



iit 1 JtNb I IT 31 1 



M 
O 



o 

o 

3 



O 

o 



D8BE 


3451tF 


08C1 


£601 


oac3 


F6EA 


38C5 


iF 


08C6 


CD79D0 


DBC9 


3AS2EF 


38CC 


E6E0 


OSCE 


*F 


D8CF 


3AEFEF 


D8D2 


18E3 •38371 



LO 


AjPIAAD 


AMI 


0000 00019 


OR I 


VFL3 


MOV 


C.A 


CALL 


DPAO 


LD 


A,PIA3D 


AND 


OEOH 


MQV 


C.A 


LD 


A,VRTOFF 


JR 


SLD2 



;GET OLD VALJE 
:SAVE DESSITr BIT 

;0r in h3rizdmtal dfrset 
;function pia 



SHOUSE KEEPING SITS 

;GET LAST ^E^TICAL 3=F5cT 
SAND THE VERT TO AL5D 



<eysoA',5 scAN»jiNG £ DEca:e 



SOiCIM eaix assembler ver 3.5E <:/i5n= =9:9? Page 93 



o 
o 



o 
o 



03D4 

DS04 19D97F7F 

D8DB 7FOD275S 

D3DC ^l^^^ll^ 

SaEO 35363738 

aSE* 71776572 

DSES 74797569 

D8eC 61736456 

D8F0 67686ASB 

03F4 74785376 

38F8 526E60aC 

08FC 3AS530Z0 

D900 2E706F39 

D904 8B3C2a2F 

0903 335C5C30 



:KE¥ CG3E TRANSLATION TAiLES 

ky:dts: 



D3 
Qfl 
DB 
DB 
D3 
DB 
53 
Q8 
D3 
OB 
DB 
DB 
33 
DB 



esct tab« arc* ere 

ere, or, «" •, • f 

•1'. '2'. M't '4' 

•5' . • 6' t •'•» '8' 

'q'» 'h''» 'e'* "r' 

•t', 'y". 'W , • i ' 

•a't ' 3't '1'. • f 

•g'r 'n', 'J', 'k' 

•z". 'X't "c". 'v' 

•3« . " n' . 'm' 1 ' 1 ' 

8ah. Sih, '0', • • 

'••l '3'. 'O*. '9' 

83h. 8ch, •-'. •/■ 

•: ". •%•» • I '. •=• 



090C 

390C 22OO0ODO00 

0911 3C5F3E3F29 

3916 2140232425 

3913 5E262A2800 

0920 3A002B00 

3924 731F7D7E 

0928 3031828334 

092D 8535373839 

D932 30000050 



SH^T.H: 



:TL T6: 



DB 
D3 
DB 
DB 
D3 

03 
DB 
DB 
08 



'"•t OOht OOh. OQhi OOh 

■<•, «_•. '>•. •?•» •)• 

•! 'f 'S'. •#'» 'l* » '?• 

•*', •£'. •*•» • < ■ . OOh 

•:', OOh. ■+'. OOh 

't'. ■.•-43ht •>'. '"' 

eOh, Slh, 32n, 83h, 34h 

35h. 35h. 37h» 38h. S9h 

OOh. OOh. OOH. 60H 



IE5E-433 INTERFACE. 
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O 
o 



a:!^^*!!*.! 



.45H 



n 3 



; ENTERED 05/01/31 F^OM TNH XEROXt S:H. I 



a 

O 
o 

3 



;L4ST edited at 09:29 on 11 NOV 30 

;THE^E A?E F3U^ commands T) the 6321 

: 00 PERIPHERAL/DIRECTION REGISTER A 

; 01 CONTROL RESISTER A 

; 10 PERIPHERAL/DIRECTION REGISTER B 

; 11 CONTROL ^ESISTER S 



:pdra 
;c^A 

:?DR8 

:c^B 



;6IT 2 QF THE CDNT^aL REGISTER (4 AND B) ALLDwS SE.ECTU'j 3F EITHER 
;A peripheral interface register or a data 0IRECTI3N RFSISTER. 
;A "I" IM BIT 2 SELECTS T-^B PERIPHERAL REGISTER. 

:TH£ T»(0 DATA DIRECTION lESISTERS ALLOri CONTROL -}F THE DIRECTIDN 
;0r DATA THROUGH EACH CORRESPONDING PERIOHERAL DATA LINE. 
;A DATA DIRECTION REGISTER BIT SET AT "0" CONFIGURES 
STHE CORRESPONDING PERIPHERAL DATA LINE AS AN INPUT. 

;A reset at POWER U? HAS THE EFFECT OF ZEROING A.L PIA REGISTERS. 

;THIS iJILL SET P&0-PA7. 'S0-P37, C42, AND CS2 AS INPUTS. 

;AN0 all INTERRUPTS DISABLED. 

JSIGNALS ATN, REN, AND IrC WILL SE DRIVEN LOi< 

;UNTIL INITIALIZED 3Y SOFT,^ARE. 

:DATA DIRECTION IS ALWAYS SET FOR OUTPUT =0R THE DATA REGISTER. 

;0ATA MUST 3E SET TO ALL ONES WHEN INPUTTING. 

;THe INTERFACE IS IN SOURCE HANDSHA<E MODE IF DATA ENABLE IP30) 

;IS SET TO "0", AND IN ACCEPTOR HANDSHAKE HODE IF SET TO "1". 

;WHEN SWITCHING FROH SOURCE TO ACCEPTOR HANDSHAKE. 

;ATN will ALWAYS 5E LOW. 

;take control can only be called following a go to standby. 
;after a fatal error, perform an ifc reset. 

;standard VALUES used: 

;CCRA OClltlFOIDIRJlO 
:CCR3 OCIKREN) (OIRIOO 



;C?DRA SOURCE 

;C?DRA ACCEPTOR 

;C?0R3 SOURCE 

:C3DRB 4CC-PT0R 



DIRECTION 
:Ata 



DIRECTION 
DATA 



DIRECTION 
DATA 



DIRECTION 
DATA 



1111 1111 
DATA 



1111.1111 
1111.1111 



DOll.llll 

DODA 0013 



1101.0111 
D130 3101 



ATN 



SO^CIH 603x issenbler (^er 3.5E <:/55/7 = 



IEEe-4S8 INTERFACE. 



=9:92 Pigs 9D 
8:RDM141 .45K 



O 
o 



O 
o 

3 



PJA SIC^AL DEFIHlTiaNS; 

AM SIGNALS A?e 13H OM THE IEEE 3US WHE^ '14 PESISTER Ca^JTAl^^S 



PAO 


DID 


1 




PAl 


Die 


2 




PAZ 


310 


3 




PA3 


013 


4 




PA* 


DID 


5 




PAS 


DI3 


S 




PA6 


DIO 


7 




PAT 


DID 


B 




r,Ai 


S^Q 






CA2 


IFC 






PBO 


ENAc 


LE 


DATA DUT 


PBl 


ENABLE 


nda:/nrfd 


Paz 


ENABLE 


E3I/DAV 


PB3 


EOI 






PB* 


ATM 






PBS 


DAV 






PB5 


NDAC 






pa? 


NRFO 




CBl 


MOT 


USED 


CB2 


^EN 







CE»IA3LED WHEV "3») 
(ESA3LE0 H-IE'J "D") 
CESASLFD WHE>( "0"! 



CDNTROL HO^D FORMAT 

t 7 K 5 ]C 5 K -V It 3 M 2 3C 1 H 3 1 



tIRaAl)tnQA2]C 

tlRSBlJ tIRQ!12H 



:A2 CONTROL 

:32 :dmtrol 



n OORAU CAl C3NTR3L] 
][ DDRBK CBl C3NTR0L3 



IRQAl 





IR3A2 





CAZ 


110 




111 


DORA 







1 


CAl 


10 


IRQBl 





IRQBZ 





CB2 


110 




111 


DDR8 







1 


CBl 


00 



INTERRUPT FLAG SET Bi FALL 0= SRS 

MDT USED 

SET IFC HIGH 

SET IFC LOW 

R/^ DATA DIRECTION REGISTER A 

^/^ PERIPHERAL REGISTER A 

SET IRQAl HIGH OS RISE OF SRQ 

NOT USED 

SOT USED 

SET REN HIGH 

SET REN LOW 

R/W DATA DIRECTION REGISTER B 

R/W PERIPHERAL REGISTER B 

SOT USED 
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IEEE-438 INTERFACE. 3:R3m^l .*SM 

O 
o 

•a 

=■ ;BI0S call l: CONTROL 3UT 

J- 

« 5 CAN BE CALLED WHILE IN ANY STATE. 

ID 

"I? ; EXITS IN THE CDNTRDLLE^ STANDBY STATE <ATN HIGH), 

S ; SOURCE HANDSHA<F M30E 

O 

3 ;?ARAHETER PASSED IN RtSISTER C: 

O 



BIT D IF "1", THE IPC SIGNAL IS SET L2^ =3? 103 MI:R3-SEC 
AND ALL 'lA SIGNALS ARE INITIALIZED 

SIT 2 1 

OX NO ACTIO'^ 

1 SETS REN HIGH 

1 1 SETS REN LOW 



o 

o 

3 



O 
o 



lEEE-'iSS I^TERFA:e. 



SQ^CIM 80?x Assembler y/sr 3.5E <'.l%5n' =9:92 Paga 52 

a:SD>1141 .HSi^ 



o 






o 






•< 


D935 




3- 


3936 




«■ 






@ 






CD 


0936 


F5 


S 


D937 


E5 



IE. CO: 



PROC 



3938 CB41 » 

393A 2823 *;967S 



PUSH 


AF 


PUSH 


HL 


3IT 


0,C 


JRZ 


:81CZ0 



;CHFC< IFC SJB-C3Hk|AM0 



093C 210129 

093F 363A 

39*1 3EFF 

39<f3 320029 

39*6 363E 



INITIALIZE ALL lEEE-'.B^ SIGNALS 



LK 
STO 

LK 
STO 

STO 



HL.:CRA 

0011 10133. CHL) ;£N43LE S^Q AM3 SET IF:-}JT .QA 



A,llll_11113 

A.CPORA 

00H_11133,CHL] 



;3nECT 3ftTA OJT 



39*8 AF 

09*9 320029 

09*C 210329 

39*F 3o33 

0951 3E3= 

0953 320229 

3956 363* 

395S 3E02 

095A 320229 



XRA 
STD 
LK 
STD 

LK 

STT 
STO 

LK 

STO 



A,:PDiiA 
HLtCCRB 
0011 03039. CHL] ; S £T REN-^JT HIGH 



A. 3311.11113 

A,C?3»B 
0311.3103B,[HL] 

4,0033.03133 
A.C'DRB 



SOIRECTia^J F3^ STU^CE -!A^DSHl<r 



:VALUES =3< S3JR:E H&^J3S^A<,: 



;LFA^3 IFC LZM f;r 130 «4IC?0-S:C 



3950 


3E19 




LX 


A, 25 


395F 
0960 


3D 

20FD '•395F$ 


:31C10: 


DEC 
JRNZ 


A 

:31C10 


0952 
09S* 


3E36 
320129 




LK 
ST3 


A. 0011 OllOf! 
A.CC?4 



iOELAY 133 «IC'a-5EC 



:SET If 



HIS-< 



3967 :351 s :31C20: 3IT 

3969 230B *3976S J'Z 



:31C*3 



:CHECK R:N 5 J3 -C 3". 1AS3 



;SET/CL£4R ^FN 



0963 


353* 






LK 


396D 


:3*9 


i 




3IT 


39&F 


2802 "D?' 


r3t 




JRZ 


3971 


3E3C 






LK 


0973 


320329 




:S1C30: 


STO 


0976 


El 




:91C*0: 


PDP 


0977 


Fl 






PO!' 


3978 


C9 






^ET 



4,0311.01003 

l.C 

:31C33 

4,0011.1103? 

A.CC^3 

HL 
AF 



o 
o 



SO^CII 303x Assembler /er 3.5E <:/55/7= 



IEEE-*33 IMTERFACE. 



=9:92 '393 93 
3:R3«11'»1 .SSH 



3 979 



IE. SI: 
3I0S CALL 2« STATUS IN 

CAN 3E CALLED ONLY WHILE IM SOURCE HANDSHA<; MODE 
BIT OF REGISTER 4 SET 1 1= SRQ IS LDW 



3979 



PROC 



3 

CD 


3979 


E5 




PUSH 


HL 


9 


097A 


3A0029 




LD 


A.CP3RA 




097D 


210229 




LK 


HL,C?D^B 


C 


3980 


CB8E 


S 


CBIT 


1,[HL] 


? 


3982 


C3CE 


S 


S3IT 


1,[HLI 


O 
o 


^98'^ 


3A0129 




LD 


A.CC^A 


1 


0987 


E633 




AND 


1000.00033 


o 
3 


3989 


07 




RLC 


A 


o 

3 


398A 


El 




PCP 


HL 




0985 


C9 




RET 





;CLEAR 1?0A1 

SPULSE EMA3LE ndac/nrfa 



:SET SRQ VALJE I ^i 4 



o 

o 

■g 



ieEE-43B IViTERFACE. 
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B:R3H141 .ISM 



393C 



IE. GTS! 

SmOS CALL 3 GD TO STA>i03Y 

;can 3e callto only mile in source handsha<h hode 

:ei)t?y 

:ndne 



o 

O 
o 

3 



o 

o 



B98C 



098C F5 



3980 


3E02 


39SF 


320229 


0992 


AF 


3993 


320029 


3996 


Fl 


3997 


C9 



PRDC 




PUSH 


4F 


LK 


A, 0000.00133 


STO 


A.CPDRB 


XDR 


A 


STO 


A.CPDRA 


POP 


AF 


RET 





iSET ATM HIGH 

:float data jus 



o 

o 



e 
9 



IEEE-433 INTERFACE. 
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B:R3M141 .\Sn 



D99S 



lE.TC: 

:BI0S call 4 TAKE CONTROL 

;C4N BE CALLED ONLY WHILE IN THE CONTROLLE'* STANOaV STATE (ATN HIGH!. 

5EXITS IN THE CONTROLLER ACTIVE STATE (ATM L3H)t SOU'ICE ^A^JOSHAKE MODE. 

;aiT OF REGISTER C SET TD TAKE CONTROL ASYNCHR0N3U5 



;e)(IT 



1 








;a 


= 


o 

1 


3998 
998 


E5 




PROC 
PUSH 


HL 


o 
o 


0999 


210229 




LK 


HL.CPD^B 


^ 


099C 


CB*1 


$ 


BIT 


O.C 


o 
3 


D99E 


2022 »09: 


-.2% 


JRNZ 


:B«30 



FRROR CODE 



;TftKE CONTROL SYNCHRONOUSLY 



D9A0 


3607 






STO 


OOOO 0111B,CHL3 


;disable drivers 


09A2 


3A0329 






LD 


A.CCR3 




D9A5 


CB97 


$ 




CBIT 


2, A 




09A7 


320329 






STO 


A,CCRB 




09AA 


3607 






STO 


llOl.OlllB.tHLl 


:dhecti3n register 


39AC 


CBD7 


S 




SBIT 


2tA 




D9AE 


320329 






STO 


A,CC?3 




09B1 


3685 






STO 


1000.01018, tHLJ 


;SET NRF3 LOW 


09B3 


3619 






LK 


A, 25 




3985 


C86E 


$ 


:B*C10: 


BIT 


SttHLl 




39B7 


2807 "09CO$ 




JRZ 


:B*C20 


;DATA valid has DR3I 


3989 


3D 






DEC 


A 




39BA 


20F9 •3985$ 




JRNZ 


:B4C10 


;WAIT 103 MICRD-SEC 


09BC 


3EB1 






LK 


A, 1000.03013 


;SET DATA VALID TI>1i 


09BE 


1816 *3936$ 




JR 


sBtC^O 




09CO 


36C5 




:3'rC20: 


STO 


IIOO.OIOIB.IHLI 


;SET NDAC LOi* 


39C2 


CBE6 


s 


:B'fC30: 


SBIT 


"tftHLl 


;SET ATN Law 



E^ROR 



5SET-UP FOR SOURCE HANDSHAKE 



09C4 


3A0329 


39C7 


CB97 


D9C9 


320329 


09CC 


363F 


39CE 


C3D7 


09DO 


320329 


B9D3 


3612 



09D5 AF 



3906 
D9D7 



El 

C9 



iB^-C^O: 



LD 


A.CCR3 


CBIT 


2. A 


STO 


AfCC^B 


STO 


0011_11118,IHL3 


SBIT 


2. A 


STO 


A.CCRB 


STO 


0001.00103, CHLl 


XOR 


A 


POP 


HL 


RET 





SDIRECTION REGISTER 



;CDNTROL SIGNAL INITIAL /ALUE 
ICLEAR E^ROR CODE 
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IEEe-*88 INTERFACE. 



BtRSMl*! 



.^S1 



39D8 



lE.OIM: 

SBIOS CALL 5 OUTPUT INTERFACE HESSAGE 

5CAN BE CALLED WHILE IN ANY MODE OR STATE 

;E)CITS in the source handshake mode with ATN LOW. 



;exit 









:a 

;c 


ERROR CODE 
MULTI-LINE MESSA3E 


0908 






PROC 




0908 


£5 




PUSH 


HL 


09D9 
39DC 
09DE 
D9E0 


210229 
CBE6 
C3^6 
2825 "DA 


$ 
S 

07t 


Lie 
S3IT 

bit 

JRZ 


HLtCPO^B 

4,tHLI ;SET ATN L3W 

O.CHLl 

lE.SHK 



;SET-UP FOR SOURCE HANDS-IACE 



D9E2 3617 

09E4 3A0329 

09E7 CB97 

09E9 320329 

D9EC 363F 



STO Q001_01119»!:HL] :0ISA8LE 0^I\/ERS 

LD A.CCRB 

CBIT 2. A 

STO A.CCRB 

STO 0011 llllB.tHLl ;DIRECTI0N REGISTER 



D'9EE CBD7 
09FO 320329 



SBIT 
STO 



2«A 
A.CCRB 



iFLOAT EXTERNAL DATA BUS 



D9F3 AF 
09F4 320029 
09F7 3612 



XOR 
STO 
STO 



A.CPORA 

0001 00138. [HL] :CDNTROL SI3N&L INITIAL rfALUE 



39F9 180C "DA07S 



JR 



lE.SHK 



IEEE-488 IMTERFACE. 
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8:RilM141 



.45M 



O 

o 



O 
o 

-1 
•a 
o 



D9F8 



lE.ODM: 

18105 CALL 6 QJTPUT DEvI^E HtSS&GE 

;C»N BE CALLED ONLY WHILE IN THE SOURCE HAMDSHAKE "IDDE AUH ATS HIGH OR LOW. 

;EXITS IM the source handshake MODE WITH ATN HIGH. 



:exit 









;c 


= 








;b 


= 








:a 


= 


09FS 






PROC 




D9FB 


E5 




?USH 


HL 


39FC 


210229 




LK 


HLtCPDRS 


D9FF 


caA6 


i 


CBIT 


4. IHL] 


OAOl 


CB40 


t 


31T 


0,B 


DA03 


2802 * 


3A37$ 


JRZ 


le.SHK 



MULTI-LINE MESSAGE 
EOI REQUEST 
ERROR CODE 



3A05 CBDE 



SBIT 3,[HL1 
;PERFORH SOURCE HANDSHAKE 



DA07 
0A09 


CBSE 
2018 


I 

»3A26$ 


IE.SHK: 


31 T 
JRNZ 


S.tHLl 
:B6C50 


OADB 
3A0C 
OAOF 


79 

320029 

3E0A 




HOV 
STO 
LK 


A,C 

A,CP3?A 
A, 10 


3A11 
3A13 


:b7e 

2807 


$ 

»3A1C$ 


:BSC2a: 


BIT 
JRZ 


T.tHL] 
:B6C30 


3A15 
3A16 


3D 
20F9 


"OAllS 




DEC 
JRNZ 


A 

:B6C23 


0A18 
OAIA 


3E82 

181F 


*DA3B$ 




LK 
JR 


A. 1000 03103 
:36C80 


3A1C 
3A1E 


CB76 
2004 


S 
»3AZ4S 


:36C30: 


BIT 
JRNZ 


6ttHLl 
:B6C40 


0A2O 
3A22 


3E81 
1817 


"•0A33S 




LK 
JR 


A,1000_03013 

:B6C83 


3A24 


CBEE 


S 


:B6C*0: 


SBIT 


5,tHL] 


3A26 


3EFF 




:B6C50: 


LK 


A, 255 


3A28 
3A2A 


:B76 
2807 


i 
*0A33$ 


:B&C50: 


BIT 
JRZ 


6,tHL] 
:B6C70 


0A2C 
0A2D 


3D 
20F9 


»3A28$ 




DEC 
JRNZ 


A 
:36CSD 


0A2F 
3A31 


3E84 
1808 


»0A33t 




LK 
JR 


A, 1000.01033 
5B6C80 



;SET ATN HIGH 

;CHECK IF EDI RE3UESTE3 



;OAC TIMEajT RE-E^JTRY 
5PLACE DATA DN BUS 

:READY FOR DATA 

;WAIT FOR 103 mCRD-SEC 

;set rfo timeout error 

;data accepted low 

:set device not present error 

;set dav low 

;DATA ACCEPTED 

;WAIT 1033 HICRD-SEC 
!SET DAC TI>1E0JT E^ROR 



3A33 



:bae 



t :BSC70: CBIT 



5,CHL] 



;SET DAV HIGH 



o 
o 

3 

13 



SO^CIM 808x Assembler ver 3.5E <:/55/7= =9t92 Page 98 
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;SET EOI HIGH 
;remove data FRD»( 5US 



o 
5 


3A35 


C89E 


S CSIT 


3.[HL] 


*< 
3. 


3A37 


AF 


XDR 


A 


(D 

2 


0A38 


320029 


STO 


A.CPDRA 


e 


0A3B 


El 


:B&C30: POP 


HL 


s 


0A3C 


:9 


RET 





o 

o 



O 



!L 


= 


:a 


= 


:h 


= 


PROC 




PUSH 


OE 


EX 


OE.HL 


LK 


HL,CPD»8 


SIT 


O.tHLl 


i\HZ 


:87C10 
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aA3D lE.IDH: 

58IOS CALL 7 IHPUT DEVICE ><ESSAGE 

;can be called while in 4ny mode 3^ state 

;exits in the acceptor h&noshake mode with atn hig4. 

;exit 

er^dr code 

DE\fICe MESSAGE 
DEVICE MESSAGE 

DA3D 

3A3D D5 

3A3E EB EX OE.HL ;SAVE RE-EHT^Y DATA 

3A3F 210229 

3A42 CB46 S 

3A*4 201A *0A&0$ 

sSET-'JP FOR ACCEPTOR HANDSHAKE 

DA't6 3617 STO OD01_011 13 , CHL] :DISABLE DRIVERS 

DA48 3A0329 LD A,CCil3 

OA*B CB97 t CBIT 2, A 

DA4D 320329 3TD A.CCRB 

0A50 36D7 STO 1101_311 18, C HL3 ; D IRECTI ON REGISTER 

0A52 C9D7 $ SBIT 2, A 

3A5* 320329 STO A.CCRS 

DA57 JEFF LK A,llll_11113 SFLOAT INTERNAL DATA 3JS 

0A59 320029 STO AtCPDRA 

DA5C 3555 STD OIOI.OIOIS, C HL] tCONTROL SIGNALS INITIAL V4LJE 

DA5E 36*5 STO 0100_0101 8, C HLl :SET ATN HIGH 

;PERFORM ACCEPTOR HANDSHAKE 

;DATA INVALID TI^^EGJT ?.\Xxi\ ?t-ENTRY 

;set nrfd high 

;data valid 

;WAIT 103 mi:r3-sec 

;SET DATA VA.ID TIi^EDJT E^^OR 



3A&0 


C876 


$ 


:87C10: 


BIT 


6,tHL] 


3A62 


2820 


*3A34$ 




JRZ 


:37C50 


DA54 


C3BE 


i 




CBIT 


7,CHL] 


3A66 


jeoa 






LK 


A, 10 


DA6S 


:b6E 


% 


:37C20: 


BIT 


5tCHL] 


3A6A 


2008 


•3A74t 




JRN2 


:e7C30 


0A5C 


30 






DEC 


A 


3A60 


20F9 


"OAbSI 




JRNZ 


1B7C2D 


0A5F 


118230 




LK 


DEtlOOO 00103 


3A72 


1821 


»0A95t 




JR 


:B7CB0 


3A74 


■8FE 


% 


:B7C30: 


SBIT 


7,[HL1 


3A76 


3A0029 




LD 


A.CPDRA 


0A79 


57 






HOV 


C,A 


3A7A 


lEOO 






LK 


EtO 


3A7C 


:s5e 


% 




SIT 


3.tHLl 


DA7E 


2802 


»3A82S 




JRZ 


:37C40 



;SET NRFD LOW 
;READ DATA 



;read eoi 



o 

o 
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IEEE-*8a rNTERFACE. B:R0M1*1 .\SH 

DA80 icOi 

DA82 CBB6 $ :B7C40: CBIT 6.tHL] SSET NDAC HISH 

3A8* 3EFF 

3AS6 :36E i 

DA88 2809 •■0A93t JRZ :S7C70 SOATA VALID DROPPED 





LK 


Eti 


B7C40: 


CBIT 


6.tHL] 


B7C50: 


LK 


A, 255 


B7CS0: 


BIT 
JRZ 


5.[HL] 
:S7C70 




DEC 
JRNZ 


A 
:37CbD 




SBIT 
SBIT 
JR 


2.E 
7,E 
:87CB0 



" DA8A 3D 

DASa 20F9 *3A86» JRNZ :37CbD ;WAIT 1000 MIC^O-SEC 

3 

1 3A8D CBD3 » SBIT 2,E ;SET DATA IN*rALIO TIXE3jr E^^D* 
^ DA8F CBFB t 
9 DA91 1802 *0A95t 
■3 
3 DA93 ;3F6 $ :B7C70! SBIT 6ftHL] :SET NOAC LOi< 

= 0A95 EB :37C30: EX OE.HL JMOVE RESULTS TO RESISTE^S A A^ID HL 

0A95 7C MOV A.H 

DA97 Dl POP OE 

DA98 C9 RET 



■q 



IEEE-488 I^TERFA:E. 



0A99 



SO^CIH 80Bx issembler \ier 3.5E <:/55^7= =9:93 Pag= 101 

BiROMl*! .»SH 



IE.PP: 

;bios call s parallel poll 

;C&N BE called only while in the source r1A«JDSH4KE lOOH WITH ATM HIGH 0? LOW. 

;exits in the source handshake hooe with atn low. 



;eicit 



o 

i 

■a 
c 


jH-r-r 




DA99 


E5 


9 


0A9A 


210029 


0A9D 


3E18 


■3 


0A9F 


320229 


B 


0AA2 


36FF 


3 


3AA4 


7E 




3AA5 


3600 




0AA7 


210229 




OAAA 


3612 




DAAC 


El 




DAAO 


C9 



;a 

PROC 
PUSH 

LK 
LK 

STO 
STO 

LD 
ST3 

LK 

STO 

POP 
RET 



PARALLEL POLL VALUE 



HL 



HLfCPDRA 

A,0001_13118 ;F0RM PARALLEL POLL 

A.CPDR8 

llll.llllB.CHLl :FLQAT internal DATA 3JS 



A.CHL] 
O.CHLl 

HL.CPORB 
0001.00103, tHL] 

HL 



;reao parallel pdll data 

;RE-STaRE S3JRCE HiNDSHA<E MDDE 



SO^CI" 309x assenbler vsr 3.5e <:/55/7= 



I5cE-48S INTERFACS. 



= 9:<32 Paje 102 



*[ 3 



! I5EE dr i vers: 



o 
o 

3 



•.lie routin3s IEI^IST^T, lEIN'P and lEOUT ara jsed ta 

;transfer characters to and from an IEEE .I3vic9 attachaJ t3 thP. 

;aSBORNE IFEE Dort. The address of the device is specified in 

StTe cat I IE_ADSS. 

;The function lEINSTAT retjrns the status of the inojt davica. 

;Unf or tunate 1 y tnere is no standard xay oy wnich an IEEE davica 

;indicat=s that it has a character. In order to deterTine this, one 

;has to read the character device. 6s a CP/" transient can call 

MEMSTAT -nany times bef^ra calling lEINJ' to read a char, and IE1NST4T 

;h3s to read tna char to Jatermine the status, the character read has to 

;b>e bjffsred until call to lEIMP is -nade. lEI'JSTiT reads tne device 

;only wnen the ojffer is anoty. As zeros ara used to indicata 

Stnat the dfr is emoty, a null character can not ba read froTi the 

SIEEE device. 



o 
o 
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)44E 



IE3STAT: 

(rsturns status of IEEE 

5IEEc always aooears t3 33 ready 



3AAE 



PR DC 



O 
o 

3 



DAAE F6FF 
OASO C9 



OR! 

RET 



OFFh 



IEEE-438 INTERFA:B. 



SOi^CIM 303x asssmbler ver 3.5E <:/55/7= =9:92 Page XO* 



0*B1 



O 
o 

3 



O 
o 



lEINST&T: 

;gsts status of the insut device attached to IEEE sort 

:if a char is present in IE_char then return with DF-H status 

;el S9 

•make device talKer 

;^ead the device 

; i f char read then 

; store in bfr 

•make untalk 

;rsturn with status of bjffer 



OABl 

OABl 3ADCEF 

0AB4 B7 

DABS Z803 »DAiA$ 

0AB7 FSFF 

0AB9 C9 



PROC 

LDA 
OR A 
JRI 

DRl 
RET 



IE_C4A? 

A 

lEIlD 

OFFh 



iif ohar present tneri 
Sratjn ^ith 0FF4 status 



o 

o 



o 

OS 

cr 
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9&BA 

JABA 3A08EF 

DABD C640 AOI IE TALK ;get prinary addrass 

OABF *F 

DACO C0D809 CALL lE.OIM !out3Ut interface nasssge 



g 0AC3 37 

O 3AC* 20F't »DA3A$ JRNZ lEIlO ;try again if error 



3AC6 



o 3AC6 CO3D0A 



lEIlO: 




Smake talker 




LDA 


lE.ADRS 


AOI 


lE.TALK 


MOV 


CtA 


CALL 


lE.OIM 


3RA 


A 


JRNZ 


lEIlO 


lEIZO: 




Sread a char. 




CALL 


I E.I DM 


SIT 


7,L 


JR2 


leiBD 


XRA 


A 


IEi305 STA 


it.CHAR 


IE140: 




:Tiake untalk 




LDK 


G,IE_UTL< 


CALL 


lE.OIH 


OR A 


A 


JRNZ 


IEI43 



0AC9 C370 S 

3ACB 2801 "OA:e$ JR2 IEI3D ;if jrror then 

0*1^0 AF XRA A ;iTicate no ihar recvd 

3ACE 32DCEF IEi30i STA it_CfiAR Sstor th» char 

OADl 

OADl 0E5F 

DA03 :D5809 

3ft06 B7 

3AD7 20F8 ""SADli 

tratarn i<ith status of the char 

3AD9 3ADCEF LDA lE.CHAR 

OADC B7 ORA A 

3ADD C8 RZ 

OADE F6FF 3R I OFFh 

DAEO C9 RET 



IEEE-4SB ISTERFACE^ 



SO^CIM 803X Assembler var 3.5E <U<i5n-- ='=^2 ^'3^ J" 



OASl 



lEINP: 

SReads a character fron IEEE port 



DAEl 



P^DC 



DAEl CD81DA 
0AE4 28FB *3AE1S 





3AE6 


21DCE 


o 

3 

T3 


3AE9 


7E 


DAEA 


3600 


C 


5AEC 


C9 


o 
o 







CALL 


lEINSTAT 


JRI 


lEINP 


LDK 


HL.IE_CHAR 


LO 


A.CiHL] 


STQ 


Of tHL] 


^i^ 





Inai t ti I I =Tar ivai I 



;ctear the bjffer 
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o 

■a 

^ OAED lEDUT: 

2 IDLitputs the Ch3ract3r i .t rs'i C to IEEE oort 

5 ;Uses R0«! resident primitives. 

PRQC 

?USH SC Ssave the char 

Smake I i stenar 

OAEE JADBEF IE305: IDA IE_ADRS 

1 OAFl -620 401 IeIlSTN ;get prinary address 



O 



3AE0 




daed 


C5 


OAEE 


JADBEF 


OAFl 


:620 


DAF3 


*F 


OAF* 


;0De39 


0AF7 


37 


DAF3 


20F* «3AEE* 


OAFA 


CI 


0AF3 


0600 



■O aAF3 *F «0V C»A 

CALL IE. DIM ^output interface -nessags 



3RA A 



o DAF3 20F* «3AEE$ JRNZ IEQ05 ;try again if error 

pcp a 

LDIC BtO ;do not send eoi 



3AFD :5 IE322: PUSH S :says char ajain • i 

OAFE COF809 CALL lE.aD^ 

OBOl CI POP B 

0SO2 37 DRA A 

0BO3 20FS »3AFDi JRNZ ieQ22 ;try again if error 

03O5 lED-VO: 

Imaks un I i sten 

0B05 0E3F LDK C,IE_ULST 

0307 CD3809 CALL IE. Oil 

OBOA 37 ORA A 

0808 20F8 "DB05S JRNZ IEO40 

OBOD C9 RET 



SO^CIH 803x issemblar \/sr 3.5E <:/55/7 = 



lEEE-'tBS INTERFACE. 



=9:92 Pigs 



105 
,451 



-.The ? 


'ar 


; protoco 


SPIAO- 


■7 


;piBO 


= 


;piBi 


= 


;pi92 


= 


: p I a 3 


= 


;piB'f 


= 


JPI35 


= 


;PIB6 


= 


;pi37 


= 



allel port is actually the IEEE oart drivei witT tie cantronix 

I. The bit assijnements of the 'lA and ?i3 are as fallows: 

= data bus 

Ot data bus is output. 1» data bus is inout 

set to !• 

set to 0. 

D outputt 1 In3Ut 

not used 

Dutput strobs. Active = 1. 

0« printer busy. 1» printer is ready. 

not used. 



;C42 = going low indicates to device that <i3 are busy. 

;CA1 = low to high transition gates input data to oort a. 

;T'ie port is bidirectional but only one direction 

;can be active at any tine. The direction cf port is daterni 

;by rihich routines are called. If postat or parout are 

;calledt it is made an cutout port and an inout port if 
•pistat or parinp are called. 



ned 



o 0B19 3EFF 
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OSOE CV20P: 

*jiit1aiizes the port to a pAraiiei output psrt* 

3B3E PROC 

OBOE 3A3EEF 

0811 FEOl 

0313 C8 RZ Sreturn whsn in outajt H3ds 

;s3t Dort a to output Dn all lines 

0B14 3EZA 

0B16 320129 STA PA.CTL ;select directiOT reg 



LDA 


PP. MODE 


CPI 


PP. OUT 


RZ 





LOK 


A, PA. COR 


STA 


PA.CTL 


LDK 


A,PA.0R0 


STA 


PA.OIR 


LK 


A. PA. COT 


STA 


PA.CTL 


LK 


A.PB.CDR 


STA 


P8.CTL 


LK 


A.PB.OR 


STA 


PB.DIR 


LK 


A.PB.COT 


STA 


PB.CTL 


LK 


A.PS.DTQ 


STA 


P8.DTA 


LK 


4. PP. OUT 


STA 


PP. MODE 


RET 





OBIB 320029 STA PA.OIR ;output oOTstant ta air. reg to put a port i^ output Tipdj 

OBie 3E2E 

0820 320129 STA PA.CTL Jselect port a data rsg. 

0B23 3E0O 

0325 320329 STA PB.CTL iselect port b dirsctipn 

0B28 3E3F 

3B2A 320229 STA PB.DIR ;all linss ars ojtDUt sxpspt the output Pusy signal on bit 5 

0820 3E0* 

0B2F 320329 STA PB.CTL Sselect data register 

0B32 3E02 

0B34 320229 STA P8.DTA ;initializ3 pprt b data 

0B37 3E01 

0B39 320EEF 

3B3C C9 
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IE'Ee-433 INTERFACt. 



i:R3Ml*l 



, 4S« 



DB30 



0330 

D33D 
0B4O 
38*2 



CV2IP: 
! i T i t i a I 



3ADEFF 
F602 



0343 


3c2A 


3 45 


320129 


DB*? 


3500 


DS^A 


320029 


0S4D 


3E2E 


DS^F 


320129 


0352 


3eoo 


D954 


32 03 2 9 


0357 


3E3F 


3 59 


320229 


035C 


3E04 


0B5E 


320329 


0E41 


3E0e 


03S3 


320229 


DB4& 


3E02 


0SS3 


320EEF 


0363 


C9 



izss tne port ta a oarallel input oort. 
PR DC 



LOA 
CPI 
RZ 



pp. MODE 
PP. IS 



Jreturn >*h5n in iriDut norJe 
!set Dort a to incut an al I linas 



LK 

STA 

LK 

STA 

LK 

STA 

LK 
STA 
LK 
STA 

LK 
STA 
LK 
STA 

LK 

STA 
RET 



A, PA. COR 
PA.CTL 
A.PA.DRI 
PA.OIR 

A, PA. COT 
PA.CTL 

P3.CTL 

A.P3.DR 

P3.0IR 

A.PB.COT 
PB.CTL 
A.P3.0TI 
PS.D^A 

A, pp. IN 
PP. MODE 



;sel9ct airection rsg 

isutpLit constant to dir. rag ts put a jort \^ inaut node 

;sel9Ct aort a data ra^. 

Jselect sort d dirBCtian 

;all Iina5 ar? ojtaut axsspt the output pusy signal an bit 5 

Jselect data rsgistar 
;initiiliZ3 port b data 



o 

o 



iE?e-43a interi^a: 



0B6C 
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PCSTST; 

;qsts status of the jarallsl (Centronix) or i Tter attacied to tns IEEE oort 



3B6C 



P^OC 



0B6C :qO£3B 

DBSF 3A0229 

DB72 E640 

337<t :3 



CALL CV20P 
LDA PB.OTA 
A^il PP.O^OY 



;convert to outpjt 
iget port a data 



o 

o 



3B75 F6FF 
0577 C9 



QRI OFFH 
PQSIO: PET 



IEeE-438 I^iTERFACE. 
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3B78 



PIST&T: 

;gsts status of the input device attached to the oarall9l oort 



0373 



PROC 



0878 
0S7B 
0876 
3B80 


C03D0B 

JADOEF 

£680 

2009 »3SSBS 


CALL 
LDA 
ANl 
JRNZ 


CV2IP 
PIACTL 
PP.I^3Y 
PIS20 


DB82 
3BS5 


3A0129 

32D0EF 


LDA 
STA 


PA.CTL 
PIACTL 


0B38 

oasA 


E6S0 

:a 


AN! 
R2 


PP.I^3Y 


0383 
0B8D 


F6FF ?IS20: OKI 
C9 'ET 


0FF4 



;if saved status iTdicat;5 tnere is a char in the 'lA 



;this is saved as reading tns 
:pia clears tfie statjs 



IEEE-48 
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3B8E 



DA^INP: 

•ilputs a character 



■ 33B KAr 3 I I e i port. 



0B8E 



PR DC 



O 
o 



DSaE 


C07803 


CALL 


PISTAT 


3B91 


28FB »3S3E» 


JRZ 


PARINP 


3393 


AF 


XSA 


A 


DB94 


32DDEF 


STA 


PIACTL 


3B97 


3A0029 


LOA 


PA. OTA 


3B9A 


2F 


Z»A 




DB9B 


4F 


"QV 


C,A 


3B9C 


C9 


RET 





;«ai t till ciar in oia 



;clear sav/ad status 

Jinvert data 
;a 1 so in c 



o 

o 



IEEE-*88 I»4TERFACe. 
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DS90 



PA^QJT; 

;ojtputs the character it 



to the IEEE oort treating the sort as a oarallel ojrt. 



OB90 



PROC 



O 
o 



0890 


C05C0B 


DBAO 


28Fa *D890t 


a3A2 


79 


3BA3 


2F 


0BA4 


320029 


03A7 


3622 


0B&9 


320229 


3BAC 


3E02 


OBAE 


320229 


0861 


C9 



CALL 


POSTAT 




JRl 


PAROUT 




MOV 


A,C 




CHA 




;invert data 


STA 


PA.DTA 




LK 


A,PB.0TO»-STRB 




STA 


P8.0T& 


Sset strDOa 


LK 


A,P3.0T0 




STA 


PB.DTA 


;claar strobe 


i^ET 
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SIO - Serial I/O Processors. 5:R3«141 .4S1 



O 

% *r5] 



0B82 SI^ST: 

•Master reset SIO 



;C = SI.S16 or SI.S64 for 1200/300 bajd 

;exit 

;ndne 
0BB2 pro: 

LOK 4.SI.HRST 

STO AiH.SCTRL ;Tiaster reset 

MDV A.C 

o 3BB8 32C1EF STO A.ACIAD S I ast-cOTimand cell 



0BB2 


3E5T 


08B4 


3Z0OZA 


DBB7 


79 


3BB8 


32C1EF 


OBBB 


32002A 


33BE 


C9 



STD A,H.SCTRL Sselact SIO 

RET 



o 
o 
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SIO - Serial I/O Processors. 3!R3>4141 .4SM 

^ OBBF DEADER: 

3 Jlipjt one byte from reader port 

® SEMTRY 

g ;None 

9 ;eicit 

o ;C = character read 

O 03BF PROC 
o 



3 



0B3F CDESOa 

aBC2 E601 

DBC* 28F9 •■DB3F$ 

OaC5 21DAEF 

3BC9 CB36 ( 

OBCB 3A012A 

OBCe *F 

OBCF C9 



CALL 


a:istat 




ANI 


si.R^or 




JRZ 


READER 


:if not r 


LDK 


HLtSERFLS 




CBIT 


O.CHL] 




LD 


A,H.SREC 


iget data 


HDV 


C.A 


:c = A 


RET 
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SIO - Serial I/O Processors. 3:^DM1*1 .4SH 

O 

o 

=- DBDO SLST: 

a ;e*jtry 

CO 

ro 

g" ;A = 0. IF NOT READY 

3 ;A = DFFh IF ?E40y 

^ ;Z3IT = SET IF N3T READY FOR OUT'UT 

o 

I DBOO PRGC 

c 

^ DBOO CDEB03 CALL ACISTAT 

o 0BD3 5602 ANI SI.T^DY 

•3 3BDS C8 5Z ;RETUR»* 



D8D6 F6FF DR I OFFH 

0BO8 C9 RET 
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SID - Serial 1/3 Processors. S:R"»11*1 .AS« 



DB05 



D5D9 



D8D9 CODOOB 
38DC 28F8 »3B39S 



39DE 79 
D3DF 32312A 



09E2 21DAEF 

3BE5 C33E 



LIST: 
:QL]tpLit 
;emhy 
;c 


one 


byt 


9 to list 
Dhar acter 


part 
to 


out 


:ou t 


SEXIT 

;NaNE 


PR3C 

:all 

JR?. 

«4DV 
ST3 

LDK 

:bit 




SLST 
LIST 

A,C 
A.^.SXMT 

HL,S;f*FL3 
1,CHL3 






;GET STATUS 

:l30P 
;sena 3hr 



DBE7 



o 

o 



SO?CI»< 838)c Assefnblar ver 3.5E <:/55/7= =9:92 Pags U9 
SID - ieriji 1/3 Pro;essors. =!:sn,«141 .iSM 



O 
o 

T3 



o 

o 



D9E3 6CISTAT: 

JRETJRN ST&TJS DF THE SERIAL PG^l 



33E3 

3aE3 C5 

3SE9 JAOIZC 

3BEC DF 

D3E0 E620 

33EF 4F 

DSFO 340024 

03F3 E6DF 

J u i -• J i 

T3F6 *r 



; E N T ^ I 






;njN5 






JEXIT 






:a 


PS DC 


STATJS RE 




PUSH 


8C 




LD 


A.H.V!:;+1 




RRC 


A 




ANI 


20h 




«ov 


C,A 




LD 


A.H.SST5 




ANI 


OOFh 



«ov 



C. A 



03F7 3A3AEF 

DSFA E603 

OaFC 31 

DBFO 32DAEF 

OCOO CI 

OCOl Z9 



LO 


A.S£^ = L 


AXJI 


03 


3RA 


C 


5T0 


A,SE^FL 


POP 


BC 


^ET 





o 

o 



NEW DISK O^HTE^S 
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3:f(3Ml'tl .^S1 



*t6] 



0CO2 



;RESET DillVE 

;emtry 

;n3ne 



3 

13 



0C02 



SEXIT 
;Z9IT 



PROC 



SESET IF ER^OR 



0C02 


3E0A 


DCO* 


32D5EF 


DC07 


C0713E 


3C0A 


asos *ociit 


OCOC 


CD03DC 


3C0F 


3039 *OClAt 



:nOP: 



3CI1 3A05EF 

3C14 30 

3C15 20ED »3C3*$ 

3C17 3C 

3C18 37 

3C19 C9 

3C1A AF 

DClS C9 



:l: 



:E>ID: 



LOK 


4.NRETRY 


STO 


A.RTRY 


CALL 


SELORV 


JRC 


!l 


CALL 


HOME 


JRNC 


:END 


LD 


AtRTRY 


DEC 


A 


JRNZ 


ILOOP 


INC 


A 


STC 




RET 




XRA 


A 


RET 





tselect drive 



;HQME 3RIVE 
;IF SOOD 



;make not zero 

SINOICATE cRRQ' 



o 

o 



•iEH DISK 3RII/E^S 
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B:RDM141 .ASM 



M 
O 



DClC 



ISEC: 
READ SECTOR 
*«JOTE* 

^0 retries are performed at this l3v = l 
EiJI^Y 
B = NJM3E? 0= SECTORS 



O 
o 

3 



O 
o 



;exit 
;hl 
;z=iiT 
;a 



DClC 



JRTRY 

PR DC 



LAST DMA ADDRESS PLUS ONE IF 3303 TR4N5F5^ 
RESET IF ERROR 
NONZERO IF ERROR 

1 IF ER^0R{SO OLD CBIOS OOESN'T 00 RET^YS) 



DClC 3E30 
OCIE 3201EF 



LDK 
STO 



ItD.ROS 



0C21 1805 *3C23i 



JR 



R WSEC 



o 
o 



\|EiJ DISK Dlli>3\S 



3C23 



SD?::iM aO?x Assembler i/er 3.5F <:/55/7 = 



=9:92 3333 122 
3:RTM141 .IS'' 



;W?ITE A SFCTDR 

: Mo retries are p^rfarmel nt this level 

;3 = NJi^SEK 0= S^CTaRS 



DC23 



:exit 

!HL 
;ZBIT 

;a 



;rtry 

PRDC 



LAST DMA S^O^ESS PLiJS IN: IF 3C02 TR1\S1=E^ 
RESST IF t^ROR 
NONIZE^D IF E?R2^ 

1 IF E?^OR(S: OLD C6I0S DDESM'T 33 RETRY5) 



3Ca3 



3EA0 
32D1EF 



LDK 

STO 



At^ WC3.M 



[FALLS THROUGH TO "R_»JSF:" 



MEH DISK 0\li/E\S 



SO^CIM S03x Sssembisr ver 3.5E 



<:/55/7= =9:92 Page 



123 
, 1S« 



0C2S 



o 

o 



•.READ 3R W^ITE SEG'^EMT 

=5 = NJM3E* 0= SECTORS TO READ DR W^ITE 
;^.W:3>^ = D.IOS 3R Q.WRTS 



DC23 

3C28 E0<k3C6EF $ 



0C2C 3E0A 
3C2E 3205EF 



3C31 :D710E 
DCS* 2S05 *DC3B$ 



3C36 C0A53D 
3C39 3820 "3053$ 



DC33 :dfaoc 

:C3E 3813 *3C53S 



0C<fO EO'VBC&EF S 
3C44 [;03CDD 
3047 3017 ••3CbOt 



0C49 2105EF 

3C4C 35 

3C4D 230C "■0C58t 

3C4F 7E 

DC50 FE09 

3C52 200D "3031$ 

3C54 CDA50D 

:C57 3302 •■DC5BS 

:C59 1836 *3C31$ 



:exit 

SZ'^ilT 

;rtry 

PRDC 
STO 

L0< 

STO 

:select diive 
:rlcidp: call 

JRZ 



LAST Di^A ADDRESS PLUS ONE TF 3003 TRANS^Ei 

RESET IF tRRPC 

= 3 IF GOOD. 1 IF ERROR 



8C.NU<1SE: 



A.NRFTRY 
A.RTRY 



SELDRV 
:l 



;SET "O.TRKR" TO HEAD POSITION 





CALL 


R4DR 




JRC 


:ERR 


;SFE< 






:l: 


CALL 


SEEK 




JRC 


:ERR 


SREAD 


OR WRITE 






LO 


aCtN'Js^SE 




CALL 


RD_WRT 




JRNC 


:END 


;retry 


? 






LDK 


hl.rtry 




DEC 


tHL] 




JRZ 


:ERR 




LD 


A,£HL] 




CMP 


NRETRY-1 




JRNZ 


:RLOOP 




CALL 


RADR 




JRC 


:ERR 



:RLOO? 



3C5B 


3ED1 




:ERR: 


LDK 


4.1 


DC5D 


37 






ORA 


A 


3C5E 


1331 


*3C51J 




JR 


:2 



;SAVE ec 



;SET RETRY NJM3ER 



;TURN DRIVE ON 

;IF DRIVE ON DON'T READ 4:)DRESS 



;REA0 ADDRESS AND SET COMTROLLER 
;STQP 



DC60 AF 



:EMO: 



XR4 



:SEEK TO TRACK 
;STCP 



53 = nj»i3er 0= sectors to r/ij 
:rf4d/write 'E5 ?_>ic3-"I 

;IF SOOD 



;get retrys 

iNO MORE retrys 

iGET NJH3ER OF RETRY 

;L00P I<= NOT FIRST RETR*- 

;CHECK TRACK ON ^HE =IRST RETRY 
TSTC" IF ERROR 

:L00!' 

mndicate error 
;ex!T 
:indicat= sodo 



o 






SO^CIM a03x Assembler yer 3.5E <:/55/7= =9:92 Paje 12* 
NSW 3ISK D^IVE^S ?i:S3»«l'tl .4S>1 



SSET "RT^Y" &iMD ^EGESTER E 

DC61 3205EF !2: STO AtRT^Y 

3C64 5a*BC4!^F S LD aC,NU>^SEC 

3C63 :9 ilET 



;SET RET^Y T3 1 FQ^ ER^3l 4ND 3 FOl G33D 
;3C = ^ESTDRE ?C 



o 

o 



O 

o 

3 



^lEW OISK D^IVt^S 



0C59 



SO?CIM 803x ftssemblar ver 3.5E <:/55/7= -9:92 Pagg 125 

SE*IDEN: 

;OETER!HNE THE DENSITY AMD MUMaFS OF <:prTT9!; O-S TJATI^ t: tutc r^ttr^ r'OTv/ = 

;none 



JEKIT 

;b 

;Z3IT 



NUHBE^ 0= SECTORS DN ONE T14:k 
RESET IF E^ROR 
:SAVTYf> IS SET WITH DENSITY SND SE:T3R SIZ^ 



3C69 



0C69 3E02 
3C6B 3205EF 



DC6E D602 
3C70 :5 

0C71 CD710E 



007* C0A53D 

0C77 Dl 

DC78 3017 »3C9U. 



PR DC 
*CHE:K DENSITY 

;H3ME L3QP 



LOK 
STO 



A. 2 

A.RTRY 



:DEMSITY L00P{CHEC< present density FIRST) 

:CHECK BOTH 3ENSITYS 
SSAVE COUNT 



RLl: 


LD< 


8.2 


RL2: 


PUSH 


3C 




;CMECi^ 


THIS 3ENSTIY 




CALL 


SELD^V 




JRC 







CALL 


RAOR 




POP 


BC 




JRNC 


:l 



;SELECT DRIVE 

;N3 ERRO^ CHECKING F3R SEL3RV 3ECAUSE N(D ERR3RS ARE RETURNED AT THIS TIME 

!READ ADDRESS 

iRESTORE DENSITY RETIY 

;IF GOOD 



OCTA 3A00EF 
DC7D EEOl 
3C7F 32DOEF 



*IF DENSITY ERROR CHANGE DENSITY AND LOOP T3 SRL2: 



SPRESENT DENSITY 
;CHANGE DE^iSITY 31T 
;NEW DENSITY 



LD 


A.SA^^TYP 


XRI 


1 


ST3 


A.SAi^TYP 



DC82 lOEC «DC70t OJNZ :RL2 ;DEN5ITY L30? 

*IF 33TH DENSITYS FAIL H3ME DRIVE AND TRY AG A I M 



3C84 
0C87 

3C88 


2105EF 

35 

2843 »3CCD$ 


LDK 
DEC 
JRZ 


HL.RTRY 

CHL] 

:ERET 


DC8A 
3C8D 


CD08DC 
383E *3CCD$ 


CALL 
JRC 


HOME 
:ERET 


DC8F 


183D *0C6E$ 


JR 


:3H 




*SST 


"SAVTY?" 




3C91 
3C94 
3C96 


3A0CEF :l: 

E603 

CB27 t 


LO 

AN! 

SLA 


A,0STS3+3 

0030.03113 
A 


3C98 


C327 $ 


SLA 


A 



:eno i= se:ond ti'ie throjgh 

iHOME DRIVE 

send if error in home 
;try again 



SSECTOR LE^TH STATUS 3YTE 

;o-3 

;N0W is 0030_XXOOS iIM 0300 OOKXB 



SO^CIf* a03x ftss3ii5l3r wer 3.55 <:/55/7 = 



NEW DISK D^Ii^E^S 
DC9A 47 



HOV 



B.A 



=9:92 Page 



12S 



iSAVE 



3C93 BADOEF 

3C9E E6F3 

OCAO BO 

3CA1 32D0EF 



LD 


A.SAVTYP 




ANI 
QRA 


1111 DDllD 

B 


;CLEAR BITS 

;a? IN S£CT3R LEMTH 


STO 


k,SkJlfP 





*^EAD ADOi^ESS AND SET NUi^SE^ OF SECTORS i.H~i ^ETU^N 



o 
o 

3 



o 

o 



OCA't 3A0aEF 
3CA7 57 



3CA8 3E03 
DCA4 32D5EF 



LD 



A,3STS3+2 

D.A 



:rehy L3CP 



:^L3: 



LD< 

STO 



A, 3 
A.ttT^Y 



;SECTQil JUST !!EAD 



E T ^ Y S 



:rsad header l3c? 



OCAD 


35 :L30?: 


PUSH 


3E 


OCAE 


CaA5D3 


:all 


BAOR 


DCSl 


31 


POP 


DE 


0CS2 


3811 *3C:5S 


JRC 


:F^^ 






;CH2C< 


FDR LAST -1 


D-Ca'f 


3A0BtF 


LD 


A,3STS3+2 


3CB7 


«f7 


"lOV 


3»S 


3CB3 


7A 


MCV 


A,D 


DCB9 


90 


sue 


3 


DC3A 


28F1 *3C»Dt 


JRZ 


:L00? 


3C3C 


3333 ^BC:iS 


JRNC 


:2 


0C3E 


50 


MOV 


0,3 


DCBF 


13EC "3CaDS 


JR 


:L335 



-lEAJrR 



;SAVE LAST SECTOR A33^ 
:READ A33RESS 



;IF E^RO? IN RiOR 



;3 = PReScNJT SFCT3R 

:a=last se:t3R 

;last se:t3r - p^esemt sectdr 

:1F THE LAST 3ECT3R = THE 'RESEMT SE:T3R{TH!5 SH3UL3 HAO'EN 3»1LY 3N ERIOR lETRY) 

HP THE •JA.Uc IN A WAS THE LAST SECT3R OF THE TRACK 

;3=LAST S£:T3R REA3 

;LQ0? TIlL Y3U FIN3 THE .AST TRACK 



;StT NJ«BER 3= SECTORS PER TRACK 



3CC1 3C 

3CC2 "f? 

3CC3 4F 

0CC4 C9 



INC 

XRA 

RET 



A 
3, A 

A 



:A=NJM3E? 1= SECTORS 3ER TRACK 



:res=t !=la3S 
;!j0g3 return 



*IF NU'43. sec. error "^AKE LAST SECT3R READ ZEST ASJS RETRY Tj :L03P1 



3CC5 


1603 


:ERR: 


L3K 


D,0 


3CC7 


3A35EF 




LO 


AtRTRY 


OCCA 


30 




DEC 


A 


3CC3 


200D "OCAAS 




JRNZ 


:RL3 


3CCD 


3E0! 


:ERET: 


LOK 


A,l 


OCCF 


37 




"'RA 


A 


3CD0 


C9 




?ET 





;retry 



;FLAGS to N3NZFR3 
: ERROR RETURN 



o 

o 



sew DISK D^IVt^S 



3CD1 



SO^CI'^ 80Sx Assemblar var 3.5E <!/55/7= =9:92 Pag» 127 



SCTRKS: 

;StT C3NTSQLi=* T?4C< ^ESESTFR 

;9.T?K^ <= SaVTRK 

;USE9 IN FORMATING WHEN fOJ OCN'T KN:W Writes THE rlEA3 IS 

:emt?y 

;S&VTR< = TR4C< 



:ekit 



savT^K 



OCDl 



PROC 



o 

o 



3CD1 


3A15EF 


DCD4 


320121 


0CD7 


:9 



LD 

STD 

"lET 



4.3AyT^K 
AtD.TRKR 



o 

o 



SO^Cli^ aosx ftssemblar vsr 3.5E <:/55/7 = 



NEW DISK D^II/E^S 



3C08 



=9:92 Page 123 



HOME: 

;hdme 3ISK amvE 

JDRH^E IS ALREADY SELECTED 4ND READY 

;if "SEKDEL" has tie verify bit S3t this pro: 

JE-iT^Y 

JSOISK = O^IVE 



><ill narK for see< and or; arrors 



;tXIT 
;C3IT 



SET IF t^ROR 



DCD8 



PROC 



3C38 


3A13EF 




0CD3 


E607 




OCDD 


CD*83E 




3CE0 


03 




3CE1 


C0530E 




0CE4 


D8 




3CE5 


3A0021 




DCE8 


:357 


i 


3CEA 


280C *3C = 


-■a 


3CEC 


3A135F 




DCEF 


E604 




aCFl 


:3 




DCF2 


3A3Q21 




3CF5 


E6ia 




3CF7 


:8 




3CF8 


37 




aCP9 


:9 





: l: 



LD 


A.SEKOEL 


ANI 


000D_0111B 


CALL 


FOSK 


^C 




CALL 


HBUSY 


?C 




LD 


A.O-STSR 


SIT 


2. A 


JRI 


:l 


LO 


A,SE<DEL 


4NI 


0000.01033 


RZ 




LD 


A.G.STSR 


AN I 


OOOl.loooa 


^l 




5TC 




RET 





;GET seek DELAY 

SSPEAD £ VERIFY 3ITS ONLY 

;FUMCTIOV| DISK 
;IF ERRO^ 

:WAIT FO^ 3U5Y T3 D^:? 



;IF NOT ON T^ACK ZER3 



iVERIFY? 

.•'40 VERI=Y 'JDDD RETURN 



;TE5T SEEK AND CRC 
SGODO RETURN 

:IF ERROR 



o 

o 



O 

o 

3 



NEW OIS< D^Ii^ERS 



DCFA 



OCFA 

DCFA 210121 

0CF2 3A15EF 

OOOO BE 

DOOl C8 

0002 320321 

ODDS 0610 

DD07 180C *0015S 



SQ^CIM 803x Assemblsr ver 3.5S <:/55/7= 



StEX: 

;see« to track defi*j5d bc savtrk 
;t^a:k rfs updated mo verified 
;EMT^y 

;SAVTRK SET TO DESIRED T?a:k 



=9t92 Pigs 129 
3:R3M141 .US". 



EXIT 
C3IT 



SET IF E^RDR 

IF NO ERRQR COMT^QLER TRACK = SAVTR< 

PROC 



LCK 


HL.O.TRK? 


LD 


A.SAVTRX 


CMP 


[HL] 


R2 




ST3 


A.D.DATR 


LDK 


B.D.SEK 


JR 


PSEKC 



SSETURN 

;SET tra:k wanted 

;PERFORM SEEK CDHMAMD 



\iEW 3ISK D^Ii'E^S 



SO^CIW 803x Assembler Jsr 3.5E <:/55/7= 



=9:9Z Paga 



130 



0009 



STEP: 

:STEP ONE TRlCiC 

;S»VTR^ IS NOT USED IM HI5 PROC 

iCGNTROLER TRX RES IS UPDAIEO 

;verifv is performed 
;ent^y 

;ndne 



;e)(IT 

;CBIT 



= SET IF EIR3R 

:F ^0 ERROR :OViTROL£R TR4CK = 



TR&t;< v/- 1 



3009 



3009 

3003 



0620 

1903 *3015t 



PROC 



LOK 
JR 



S.O.STO 
PSEKC 



jpcupQun sTE' :o^wsN3 



o 

o 



stw 0I5K Dmve^s 



ODOD 



SO'CT'I 309x 43sem3ler ver 3.5E <J/55/7 = 



ST5PIN: 

sste' in one t^ack 

;s4vt^k is mdt used in this psqc 

:control£» jsk res is updated 

;entry 

;NnNE 



=9:9? Pag= 
a: ROM 1*1 



131 



EKIT 

C9IT = SET IF E^ROS 

IF NO ERROR :3»ITR0LER TRftCK = TRAC< •• 1 



O 
o 



OOOD 



OOOD 06'i-O 
3D0F 180* 



'DD15i 



PR DC 



LDK 
JR 



B.O.STPI 
PSEKC 



5PERF0RH STEP-IN COMMAND 



NEW DISK D^IVE^S 



SO^CIM 80S^ Assembler ver 3.5E <:/55/7= =9: 9Z^^Paga J3Z 



ODll STEPOUT: 

!STEP OUT ONE TRftCIC 

SSaVTRK IS N3T USED IN HI3 PROC 

••cdntrdler tsk res is updated 
jverify is performed 
:emt»v 
;none 

;exit 

;C3IT = SET IF E^ROR 

; IF ND ERROR CONT^OLER TRACK = TRACK - 1 

0011 Pf'oc 

IIW ?t^^0ai5S T PS^Jr' ;PERFORH STEP-OUT :0.«A« 



o 

o 



O 
o 



NEW DISK aSIVERS 



0D15 



SD^CI>« 80Sx issemblsr var 3.5E <!/55/7 = 



0015 

D015 3A13EF 

0D18 E617 

ODIA BO 

ODIB CD'tSOE 

3D1E 58 

OOIF CDS8DE 



0022 3A13EF 
3025 E604 

aD27 :3 



0028 
3D23 

3D20 



340021 
£618 



0D2e 37 
302F C9 



=9S92 Pjgs 
B;R0H1*1 



133 



isSEKC: 


;oR IN 


;E'»T?y 


!8 


:exiT 


;C3IT 



= SEEK TYPE COMMAND 



SET IF 



F^ROR 



PROC 

LO 

AMI 

0R4 

CALL 

RC 



A.SEICCSL 
0001_0111S 

3 

FDSK 



CALL WBUSy 

:che:k for errors 



;omly update. verify, s s^eao 
;0r in command 

;function disk 

:IF ERROR 

;WAIT for 3USY TO DROP 



LD 

ANI 

RZ 


A.SEKOEL 
0000_01003 


sverify? 

;no verify 3000 return 


LD 

4NI 

RZ 


A.D.STSR 
0001_1D033 


;TEST SEEK AND C?C 

:gooo return 


SIC 
RET 




; IF ERROR 



SO^CI'I 80Sx Assembler wer 3.5' 



MEi^ )!3K D^WE^S 



<:/55/7= =5:92 ^3^^ 13^ 



0D30 



^!EftD: 


;em',y 


;s 


lEKIT 


;hl 


:C3IT 



NUMB 0= S=;T3aS TG REID 



LAST T^4 AD-j^ESS PLUS Oit IF GGGD rR4M5? = ^ 
SET IF S^?,.ZR 



3530 



P^3C 



DD30 3£30 
DD32 3201FF 



LDK 
STO 



A.D.^DS 
A,'. WC3M 



3335 1305 "3030* 



JR 



^D W^T 



;JHP A*iO '.ETJRN T5 C5LLIVG P^3C 



MEW 3ISK DSIVE^S 



SG'CIH aoSx AsssTibler \ist 3.5E <:/?5/7= -9:92 Paqa 135 

3:R3M141 .4SH 



3037 



(^"^It;: 


JE^iT^Y 


53 


TEXIT 


;hl 


:C5IT 



LAST -j--\K iDD'ESS PLUS 0»J= IF 3003 TR1NSF = ^ 
SET IF E?R3R 



0037 



P^OC 



D037 3E.43 
3D39 3231Er 



LDK 
STD 



A,D.;V?TS 
A.? IJC3M 



-9LLS THRC1J3H TG ^D s<?T 



SO'-Cri 3:3x AsseTiblar jar 3.5-: <:/55/7 = 



vfcW 1I3K S5WE5; 



= 9:92 =3 12 
3 : H 3 H 1 4 1 



134 



aD3C 



o 

o 

3 



i^iAd ^i? WRITS 4 SECTOR 



;entry 
;3 



; e y I T 

;hl 

;C3IT 



NJMB C- 5£:T3!?S Tj P.E49 3< W^ITF 



LAST IHA a:)3i!ES3 PLUS riME IF G;D3 T51\i5 = E^ 
SET TF '=?['. ,T^ 



003C 



3D3C 

:>03F 



3M4EF 
320221 



psac 

;SET SECTOR ?S!; 



LD 
ST3 



t.SAVSEC 

4.3.SECR 



D042 C5 



pijSH 3C :siVE Nj-'^E^ 0= 5e:t:rs tj h/^ 

;SET DE TC MJMoE? 3F 3YTES 1\ CNE SECTCR 



3D43 


213003 


LOK 


3046 


34D0EF 


LO 


3D49 


C33F t 


SRL 


3043 


CS3F S 


SRL 


3343 


S403 


ANl 


04F 


37 


3RA 


3053 


2304 -•3356£ 


J^Z 


3C52 


47 


MCV 


3D53 


29 :3L03P: 


A03 


3D54 


lOFD *3053$ 


djm; 



3D56 



3D57 
3055 



; l: 



CI 

:5 



PC? 
PUSH 



HL,123 

A.SAVTVP 

A 

A 

0030.3 3113 

A 

:1 

9, A 

HL.HL 

:BLC3? 

OE.ML 

3C 



!DIS< TY>E 
;3UM= TAD 31TS 

:SIZE 3\LY 
:SET FLAGS 
: I F 12 3 



iSHIFT LE=T 



3IT 



^E^NJ^ISE'- IF SV^ES 1-i 3M? SECT3R 
SE:T3^S T3 



:^ESTGRE 
iSAVE NLCIJER 



Wtl 



;3ET ;3M'^AN:3 AVO CHECK F3d huLTI-S = CT3R 



3059 


78 




3D5A 


3E33 




305C 


= E02 




3D5E 


3302 


*03S2i 



3060 OEIO 



03«.2 

0055 



3A31EF 
Bl 



«3V 


4,6 


L0< 


CO 


C"° 


2 


J^C 


:2 


LOK 


C . 1 H 


LO 


A.5_ft'C3.>A 


3R 


C 



;GET MU'13El 3F StCT3RS 
;'^AKE \3\i.MULTI -SECT3^ 

:IP LESS T-^SS' Tri3 SECT3RS 

r^AKE «ULTI-5ECT3R 

;3ET D.R3S 3? D.-'J^TS 

;HAKE >1ULTI-5E:T3a O^ 'j3>J'«ULri-S£CT3^ 



:3ET HL TO SJ>i3E? Or 



lYTES TC TRANSFER 



3D56 


210333 




LQK 


HL,0 


3369 


19 


:L3C'1: 


ADO 


HL,3E 


306A 


10r3 "0D59S 




OJNl 


:L3aPl 



305C E5 



?USH 



HL 



iSAVE LESiTH 



SC'.CI>^ 8T3x Assambler ner 



O 
o 



o 

o 

3 



\zV DISK D^IVE'.S 



3060 F3 

3D71 300't "3077$ 



3D73 01 

307* 51 

3075 F3 

3076 C9 



GI' 


»' = 


C0«'»4\0 
31 








CALL 


FOSK 






JRNC 


:3 


IF 


A3 


ORT ^EF'J? 


t DMA 






?0P 


OE 






?C? 


OF 






51 








^5T 





3.5E <:/55/7t =9:92 Paja 137 
3:^3«141 .4SW 



;IF GQOO 



:5EST3RH S'TICK 



3077 :i 
3073 2A0FSF 



307B 113A30 
007= 35 



3D7F 3431EF 
3082 '=c3C 



ODS* :43A0E 
3037 :3F03E 



303A CI 



3D83 lA 

3D8C C8'47 i 

303E 230E 'DOScS 



3090 119330 

3093 35 

3D94 05 

0095 CA330E 

3D9S C3360E 

3D98 3AO021 



iRETURN IF ERRO? I vj =0SK. 
;SET i^ETJR^J =R3-< 0><i. O^A 4335 4SD NJM3E^ jF EVTES TD T^^ASJSFE', 



;HL = 3MA A03SESS 



;foi'. retjr'.j 

;(13) GET :g«<«AN3 

:(7i 

-,(13) REA3 D'lA RETJRMS T3 :RET 
:C1CI WRITE 3MA ^ET'JRMS ro :?eT 
:R 2USY AND J.ESer 

S^ESTC.RE NiJ'13E? 0= 5ECT3^5 

;get status 
;if njct j'jsy 



:3: 




"C? 


3C 






LD 


HL,D><AOR 






L0< 


OE,:^ET 






'US.H 


OF 


:03 


3MA 










L3 


A, R_mC3M 






CHP 


D.i^OS 






JZ 


0MAR3 






JilP 


DHAW^T 



;RETJRM FRO:^ GMA AMD CHECK 



: R £ T : 



ac 



L3 


A,I3EI 


3IT 


0,4 


JP,Z 


:'t 


LDK 


0E,:^ET1 


PUSH 


C^ 


DEC 


3 


JZ 


X3USY 


JMP 


FO^IS-' 


LD 


A.O.STSR 



D09E E6 5". 

30A0 2301 »3D43S 



DDA2 37 



3DA3 FS 
3 A* C9 



:RFT1: 

ICHECK F3S e^PJRS 

:*: AMI 0101 11333 
Jll :5 



EI 
?ET 



;f3r retjrni 

;SJ3TR.4C< 3NE i^ROt" THE NJM3E? 3= SECTORS AslO SET THE ZE^O =L43 

:i= 'JQN MULTI-SECT3R R/'-< W5IT FOR 3USY TO 0R3P 

;CLE4R SJSr 

;P.ETUR^ 4N3 GET STATJ5 



! TcST wr i t 9 ar 3t 3c 1 1 

;l= 3DD3 



■Tf , 



:r;t and lost data 



;IF E^RO? RECO'O C3\TR?LER 



.ETJR\ 



ESTERS 



S3'CI^ 3 3's< assemaler Jer 



<:/5t/''? = 



Hen 3!3K ,35 11/E^S 



' : :. M 1 4 1 . ^ ', '' 



;'.eai Address info. 

;REA3S six. ?YT;S l\-'^2 n^rT^-.M 

:entsy 



3 
■a 



30A5 



:D45 


3e;d 


0D47 


P3 


3048 


:oi8De 


■5 DAS 


133C * 



!EXIT 

;a 



OFF-^ !F '^I ^E : 
SET IF F^R^R 
HE An '"SITIQV 



F^,^a= 



SETS T3ACK '.' 
PR DC 



- iM ::^T5 



LD< 
31 

CALL 
JRC 



4 . 3 . R 4 



PDS< 
: 1 



:fijnc;tiOT i\ sk 



COAO 

0033 



010 5 3 

2ia9FF 



;W4IT F3' FI?ST 003 '3'- Tl''z CUT 

;SET REGESTE'3 =:' 3"A TOiNS'=ER. 



LDK 
LOK 



; n' 4 1 ■ 



HL,3S'S9 



1/=. -) = 



;S !X 8YT=S 13 
;F3A F3R r-'*i 

TRa3<{i3wS) j' 3R3 



0'3B3 


110311 


3 036 


340321 


3039 


IF 


333A 


IF 


303B 


OtCBOD 


003F 


1? 


303F 


7A 


ODCO 


B3 


3DC1 


C27403 



3o:4 


:n36C= 


0OC7 


3EFF 


33t;<? 


131D " 



:L33': 



3 0CB 

30CF 
3300 



3003 
31306 



34 03 2 1 
77 
2 3 

CDOAOF 



C03?3F 
3311 '3C 



:3: 



L0< 


OE,. 


^►36 3 




LD 


4,0 


.S-^SR 


;(13) '=T 5T4TjS 


RA5 






jCf) 


R4R 






:( 4) 


JC 


:3 




; 1 1 1 3 3^ 3 R : 


DEC 


0^ 




;(ft) 


^ov 


4.0 




;{ <.) 


^^i 


? 




;(41 


JHl 


:L0 


nj 


;(10! 


; IMOl 


CATE T 


me QjT 


ERaos 


CALL 


FOR 


IMT 


;CLE1R ',JSY 


LDK 


A. 3 


FCH 


;A=OfFH 


JR 


; 2 




; INDICATE 4 TT-ve 



;Tf?4N:'FER fijST 3Yt: 



CALL Oi'iRO 



}' LAST fi'J- 3Y-!-E^ 



LO 


A.0.3ATR 


5(131 GET 3YT= 


STD 


A.CHLl 


;(T) store 3YT' 


I.NC 


-<L 


;(6) 

;3C = 5 


CALL 


DMAS 3 


;tl7) CALL 3«4R 



;R = TJRN FRnv( DMAP.O As;0 WAIT FOR SUSY TD 3E RESET 



CALL 
JRC 



WBUSY 
: 1 



:iF TIME 



!JT •'l^ 



o 

o 



O 
o 

3 



^itW DISK 3*IV£?S 
32Da 1Aj:ai 



30DD 2009 *3DE3S 



S3?CI^ a03x 4s39^bl = 



r i/sr 3.5= <:/55/7= =9:92 iJa^s 139 



-3 A.D.STSR 

0001 _ 110 3a 






;srT t?a:< rejester 



ODDF 340221 

30E2 320121 

0DE5 SF 

30SS 1801 *30E9$ 

ODES 37 

0O£9 F3 

ODEA C9 





LO 
ST3 


-•1 


:2: 


STC 




:l: 


51 





icT STiTUS 



STEST ^.MF, c?C A\I3 D«T4 OST 

;iF f^aci 



;get ts4;k 
:seT T;(a:K 

•.RESET C5R"!Y 



:SET C5IT 



505CIM %2'ix Assembler ver 3. 



^EW DISK. D^IVE'.S 



<:/55/7= 



=9:92 Pags 1*3 



3DEB 



R54DTRK: 

;aEA[3 3NE TRACK FROM THE 3?IVE 

SEMTRY 



;D'<flDR 



FWA :f BJPrE? 



;exit 

iC3IT 



SET IF e^r: 



o 

o 

3 


3DE8 




DDES 


3EE0 


s 


OOED 


F3 


o 


OOEE 


CD<^3^E 


g 


aOFl 


380C * 



30 = FS 



PRCC 

LDK 
DI 

:all 

JRC 



4,0. ^3T 



FOSK 
:l 



;l P ERRO^ 



;a3 DMA 



0DF3 DIFFF? 

3DF5 2A0FEF 

oo^g :ddaoe 

DDFC -B 

30F0 AF 

OOFE C9 

DDFF FB 

O.EOQ C9 



LDH 


EC.OFFFFH 


;F0R R3N 1.2 


LD 


HLtDMADR 




:all 


Df AR3 


;IN R0'« 


EI 






XR6 


A 




RET 






EI 






RET 







3 



SC^CIM 30Sx Assembler tier 3.5E <:/55/7= =9:9? P^gg I'll 
New DISK O^Ive^S 3:R:vii*1 .5s«( 

DEOl 



i=MTTRK: 








iFjKMAT 


ONE TRACK 






;e'mt^y 










!b: 




LE»iTH 




;D?^aDR = 




FWA OF .SUFFER 


;e<it 








;c?iT 


SET 


IF 


ERR3R 



o OFOl PROC 



;TEST OE'JSITr AMO set res O to O^EH 3R OFFH 



OEOl 
OEO* 
DE06 
DE07 


3A0OEF 

OF 
3002 » 


DE3SS 






LO 
LOK 
RRC 
JRNC 


A.SAVTYP 

D.OAEH 

A 

:l 


: DOUBLE 
:IF DCUBLE 


OE09 


T i r c 








LDn 


D^ OFFH 


;5 INGLE 








;giv 


'5 COi«HAMD 






OEOB 
OEOO 
OEOE 
DEOF 


3EF0 

F3 
05 

C5 




:l: 




LDX 

01 

?USH 

PUSH 


A.O.rtRTT 

DE 
8C 


;fill BVTE 

;LENTn 


OEIO 
0E13 
OEl* 
3E15 


CDiSOE 
CI 
01 
331C * 


0E33S 


;d3 


:)WA 


CALL 

?3P 
POP 
JRC 


FOS< 
3C 
DE 
:3 


;lenth 

;rILL BYTE 
;IF ERRO^ 


DE17 


D5 








PUSH 


DE 


;fill byte 


3E18 
DEIS 


2A0FEF 
COFOOE 








LD 
CALL 


HL.DMACR 
OMAW^T 





;PAD REST DF TRACK 

3E1E CI POP BC ;3 = FILL BYTE 

OEIF 210321 LDIC HL,3Z103H JDATA RE3ESTER 

0E22 lA :LOOP: LD A, CDE] ;GET STATUS 

0623 IF 

0E2'f 3006 »DE2Ct JRNC :2 JFINISHEO IF NO BUSY 

3E26 IF 

0627 30F9 *0e22t JRNC :LOOP ;IF NO ORQ 





POP 


BC 




LDIC 


HL,0Z103H 


:LOOP: 


LD 
RAR 


A, CDE] 




JRNC 


:2 




RAR 






JRNC 


:LOOP 




STO 


Bf CHLl 




JR 


:LOO? 


;C4£:k 


FOR ERRO: 


1 


:2: 


LO 


AtD.STSR 




AN I 


OIOO.OIOOB 




JRZ 


:4 



0E29 70 STO BtCHLl JSTORE 3YTE 

3E2A iaF6 »3E22$ 



0E2C 3A0021 :2: LO AtD.STSR ;GET STATUS 

0E2F £6*4 ANI OIOO.OIOOB :TEST writa protect, and data lost 

3E31 2801 *DE34i JRZ :4 ;iF GOQO 



NEW DISK a^H^E^S 
3E33 37 



SO^CIM BOSx Asssmblsr ver 3.5E <:/55/7= 



STC 



= 9:92 Pags K2 
3:Ra.«l'H .US'* 



DE34 
DE35 



FB 
C9 



:4: 



EI 
ilET 



O 



MEW 5ISK D^ItfE^S 



SC'CI*1 30ax Assemblsr net 3. 55 <:/35n= =9:92 Page I't? 



0E36 



O 
o 

3 



3E36 



3r36 


P5 


0E37 


:5 


0E33 


3EDD 


DE3A 


320021 



FD^I»JT: 




n^iTFR.'.UPT DTS< 


CDNT5CLLE3 


JENT^Y 




;N:>Ni= 




;ei<it 




;ajsy cleaned. 




PR DC 




PUSH 


AF 


PUSH 


3C 


LDH 


A,3.F!MT 


STO 


A,0.C?10R 



;M4IT FO^ at least ZS Mi;^3StC3«JClS 



3E3D 37 ORA A 

3E3E 0607 LDK B.7 

3e'tO lOFE "SEffOS :hl03P: DJNZ :WL3: 



:(7l 

;(91) = (13*7) WAIT 



3E*2 



:dbsoe 



;Cr1E:K FOR 3USY DROP 
CALL W8USY 



0E45 CI 
DE46 Fl 
3£*7 C9 



POP 

POP 
RET 



AF 



SO'CIM 308x issemblsr var 3.5E <:/55/7= =9:92 Page I't'* 
MEW DISK DRIVERS 9:R3n1141 .iS"* 

O 
o 

£• DEii3 FDSK: 

S SFUNCTIQM DISK ROUTINE 

® ;THIS is the ^NLY routine that writes T3 the CDMMAMD REGESTER 3F the CQNTRDLER CH15 

g ;THIS RCUTINE has a 3UILT I^J delay of at least 2S "IURD sec. 3EF3RE reading the 5T4TJS 3'J THE CHIP 

" ;emtry 

» ;A = FUNCTION C30E 

O 

i 5EXIT 

;A = OFFH IS TIME DJT ERROR 

1 ;C3IT = SET IF ERR3R 

13 

I 0E*8 PROC 

o 

§ [>E48 210021 LOK HL.O.STSR :STATUS AND ZDHMAMD R^GESTER 

;IF NOT 3JSY 
;RESET 3JSY 

;function drive(write co>4mand to contrdleri 



0648 


210021 


3E'fB 


Ziifb s 


DE40 


2803 »0E52t 


DE4F 


CD36aE 


DE52 


77 



LOK 


HL.O.STSR 


3IT 


OtCHLl 


JRZ 


-.1 


CALL 


FORINT 


STO 


A.tHL: 



;WAIT for 56 SINGLE AND 29 DOUBLE 

3c53 3A33EF LD A.SAVTY? 5(13) DIS< TYPE 

0E56 0605 LDK 3»5 ;t7) 

D£58 OF RRC A ;{4) 

3E59 D25F0E JNC :WL3CP ;(10) 1<= D3U3LE DENSITY 

3E5C AF XRA A ;(A) RESET CARRY FLAG 

0E5D 060D L0< B,13 ;(7) 

DE5F lOFE *3e5FS :WL0CP: DJNZ :WLCDP ;(13) WAIT 

;WAIT FOR 3USY TD 3E SET 

;(7) 

;t*) 255 LDO^S 

:TEST SUSY SIT 

JIF CHI' W=NT '.U5Y 

DE6B lOFA ^OEi'fl DJNZ :LOOP ;IF NOT TI«E-OUT 

3E&A 37 STC :IF ERROR A=FF AND C^IT = SET 

3E6B C9 RET 

3E6C 326AEF :3: ST."! A.DACTVE ;SET DRII/E ACTIVE COUNTER 
3E6F AF XRA A ;RESET CARRY FLAG 

3E70 C9 RET 



DE51 

0E63 


3E!=F 
47 






LOK 
10V 


A, OFFH 

a. A 


3E64 
3E&6 


C84b 
2 04 


S 
»3ESCS 


:LDQ': 


BIT 
JRN'. 


O.tHLI 
:3 



o 

o 



O 
o 

3 



O 
o 



Mi'il 3I5< O^IVE^S 



0671 



3E71 



0E71 CDA6DE 



0E74 


3417EF 


DE77 


21C7EF 


aE7A 


AS 


3t7B 


E601 


3E70 


FEOl 


DE7F 


2002 » 



SO^CIM 303x Assembler ver 3.5r <:/55/7= =9:92 Pags 1*5 

3:RDM1<H .asm 



SELO^V: 
:SELECT C^IVE 
SENTRY 
;S3ISK = 



iEXIT 

;zsiT 

:C3IT 



3E835 



3E81 3E*0 



PR DC 

CALL 

LO 

L0< 

XOR 

AND 

CM? 

JRMZ 

LOK 



DRIVE T3 SELECT 



SET IF PIA30 WAS THE 3A*«E AS S0I3< 
RESET IF PIA3D WAS DIFFERENT THAN SOIS< 
SET IF THERE ARE NO INDEX PULSES 



SELDEN 

A,S0I5< 

HL.DSKSW 

CHLl 

1 

1 

:l 

A»40ri 



JSELECT ^f^jSITr 



;DIS< DRIVE SH4P CELL 
;SWAP A =3? 3 IF 0iKSM5=l 
SCAN ONLV 3E 3 OR 1 

:IF NOT DRIVE 1 



3E83 


C6*0 


:l: 


ADI 


*0N 


0E85 


ijF 




HOV 


C,A 


3EB6 


3A62EF 




LD 


AtPIASD 


3689 


't7 




HOV 


B,A 


3E8A 


E6CQ 




ANI 


1100_0303S 


0E8C 


B9 




CMP 


C 


3E80 


2310 » 


3E9Ft 


JRZ 


:2 



DESF 


CDCFDE 


3 £92 


3EFA 


3E9* 


CDCF30 


3597 


3E14 


3E99 


CDCFOO 


DE9C 


3E31 


3E9E 


B7 


3E9F 


216AEF 


3EA2 


36FF 


OEA'f 


FB 


3EA5 


C9 



;SELECT DRIVE 



:2: 



CALL 


RDSKD 


LDK 


A, 250 


CALL 


DELAY 


LDK 


At 20 


CALL 


OELAY 


LDK 


A,l 


OR A 


A 


LDK 


HLtDACTVE 


STD 


OFFH.CHL] 


EI 




RET 





:set drive bits only 

:if drive already selected 

;tusn drive on 

;wait for 'lotor spin up 

;2ND DELAY 

SINDICATED DRIVE WAS »JOT SELECTED 
;SET FLA3S 



o 

o 



SO^CIM S03x Sssembler \isr 



HEU DISK OillVERS 



3.5E <:/55/7= =9:92 Page 1*S 



3E&6 



SELDEN: 

•.SEtECT SINGLE OR OaUBLE OE?JSITY 

;SAVTrP = SIT O: 

; 1 = SINGLE, = DOUSLE 



O 
o 

3 



:eKiT 

:ndne 

*NDTE 



Sit of "PlAAD" 
set = 
reset - 



3i ng le densi ty 
dojble density 



O 
o 



0EA6 

0EA6 3AblEF 

3EA9 E6FE 

3E4a *F 



PR DC 

LO 
ANI 

MOV 



AtPIAAD 

llll.lllDS 

CtA 



;pi?ESENT V4LJE OF "lA *ES 
;CLEAR SIT 



;SET DENSITY BIT 



OEAC 
OEAF 
DESO 


3AD0cF 

OF 

3002 »3£34$ 


LO 

RRC 

Ji?NC 


A.SAVTfP 
:1 


3EB2 


CBCl t 


SBIT 


O.C 


DEB* 

0E37 


:D7930 :l: 
C9 


CALL 
RET 


OPAD 



:get ois< type i^ifd 

;CBIT <= 3IT 

;if "savtyp" aiTD is o 

;SET BIT OF ?EG C 
JPUNCTIO'J OIA 



vEw DISK o^ive^s 



SO^CIM 803x issambler vsr 3.5E <:/55/7= =9:92 Pigs 147 

3:R3H141 .4SM 



0EB8 



tJSUSV: 

;W4IT FOR BUSY T3 CLEA? 

Mtis routine nust wait for 2 seconds 

52 seconds is the tine it takes for the chio to seek 39 tra:ks and have five index holes go jy. 



O 

o 

3 



DEBS 

3EB8 013000 



;exit 

:a 

:c5ir 



PRQC 
LOX 



OFFH IF TI>1E OUT OCCURRED 
SET " " " '• 



8CiO 



3EBB 340021 !L30P: 
3EBE cat? S 
3ECD 230C *3E:E$ 



Stci 


E3 


3EC3 


E3 


oec4 


E3 


DEC5 


c3 


3EC6 


33 


3EC7 


78 


0EC8 


Bl 


3EC9 


20F0 


3ECB 


3E = F 


3ECD 


37 


3ECE 


:9 



'3E3SS 



:li 



LD 

SIT 

JRZ 

EX 
EX 
EX 
EX 

DEC 
MOV 

OR 

LD< 
CALL 

STC 

RET 



AtD.STSR 

0>A 

:l 

tSP],HL 
tSP3.HL 
CSP],HL 

[SP3,HL 

BC 
AtB 
C 
:L00P 

A. OFFH 
FORINT 



;(13) 




ns) 


os.3sr 


;(7> 


G003 RE 


; { 23 7 


DELAY 


;(23) 


DELAY 


;(23) 


DELAY 


;(23) 


DELAY 


;(6) 




SC*) 




;(«> 




;(12) 


IF N3T 



■URN 



TIME-3UT 



;tihe out error 
;reset sjsr 
!Set error 



MEM 3ISK DRU'E'^S 
OEtF 



SO^CIM 808x ftssembler i^er 3.5E <:/5'i/l^ =9:92 Page 1*8 

35R3M141 .4SM 



^DSKD: 

;SELECT DRIVE 3¥ SETING THE "PIA" WITH T-15 VALUE SOECIFIEO BY 

; ENTITY 



DRIVE 



» 






:ekit 






o 






;n3NE 






o 


3ECF 






PROC 




O 












o 

3 


3ECF 


3A62EF 




LD 


A.PIABD 


c 


DE02 


E63F 




ANI 


OOll.llUB 


OEO* 


Bl 




DR 


C 


o 


DE05 


ifF 




MOV 


CtA 


o 


0EO& 


CD8600 




CALL 


0P3D 


1 


OeD9 


C9 




RET 





!GET VIO 3=FSET SN3 BELL 



;fun:tion pid-j 



McW DISK D^I/E^S 



SORCIM 808x Assembler ver 3.5E <:l'i^n- =9:92 Pass 149 

3:R3M141 .\Si1 



3EDA 



DH4RD! 

;T^A>JSFE^ data FRDM CO^iT^OLER TD MEMORY 

; E'^TRY 

JB: = 3YTES TO TRANSFER 

;HL = FWA OF BJFFER 



O 
o 

3 



OEDA 



JEKIT 

JHL 
;,DE 



PROC 



NEXT ADDRESS 
D.STSR 



O 
o 



OEDA 110021 



DEDO 


lA 


DEDE 


IF 


DEDF 


DO 


OEEO 


IF 


3EE1 


D2DD0E 


3EE4 


3A0321 


0EE7 


77 


3eE8 


23 


0EE9 


OB 


3EEA 


78 


DEES 


31 


OEEC 


C2D0DE 


DEEP 


:9 



:LD0': 



LDK 

LO 

RAR 

RNC 

RAR 

JNC 

LD 
STD 
INC 
DEC 

HDV 
OR A 
JNZ 

RET 



DE, D.STSR 



A.CDEl 



JLOOP 

A.D.DATR 

A.CHLl 

HL 

BC 

A, 8 

r 

:LOOP 



i<10) 



;t7) 


GET 


STATUS 




TCH 








:(5) 


RETJRM IF NO 


BUSY 


;{*> 








;(io) 


IF 


NO 0R3 




;(13) 


GET 


SYTE 




;(7) 


STOR 


E BYTE 




;(6) 








;(&) 








:(*) 








;C4! 








;[iOi 









■^EW DISK 3?IV£?5 



SOICI", 803x Assambler /er 3.5£ 



<:/St/7= 



= 9:92 Paga 153 



OEFO 



o 
O 



DEFO 



DEFO U0021 



3EF3 


lA 


DEF4 


IF 


DEF5 


30 


0EF6 


IF 


3EF7 


02F30E 


DEFA 


7E 


3EFB 


323321 


DEFE 


23 


3EFF 


03 


OFOO 


73 


OFOl 


Bl 


O.F32 


C2F33E 



DMAW^T: 
-.Xfer d 

;e»it^y 

;3C 
;hl 


ata fron 


neiior y 

BYTES 
FWA 3F 


to 

ro T 

3JF 


disk 

RANSFER 
= ER 


SEXIT 


= 


NEXT ADDRESS 






PKriC 












LDK 


DE.3.STSR 






iLaO": 


LD 

RAR 


A, IDE] 






:GET STATUS 
JRETJRN IF 




RAR 


:L3a» 






;IF "CO 3?3 




LD 

ST3 

INC 

DEC 

"lOV 

OR A 

JNZ 


A, tHL] 

A.D.3ATP 

HL 

BC 

A, 3 

C 

:LD3? 




;GET BYTE 
;STORF 3YTE 



3F05 



RET 



o 

o 



SO^CIw 803x ftssemblar vsr 3.5£ <:/55/7= =9:9? '30s 151 



O 



0PO5 



DF06 



DF06 3A52EF 

OF09 e61F 

3F03 itP 

OFDC C38503 



30^V: 

?03ss I ect dr i ve 
StTtry 

;S3ISK = currant disk drive 
PROC 

l:) a.piabd 

AND l.llllb 
MOV C.A 

JMP CPBO 



idsss I ect I 3st drive 



O 
o 



o 

o 



=ORHAT 



OFOF 



SD^CIM 80:3x isssmbler i/er 3.5E <:/55/7= =9:92 ?iga 

BsRDMlil 



*C73 

FOHM&T 



152 



Tnis proE will fsmat the next tra = k in l^^ 37*0 foriiat consisting of to 
track containing 10 sectors. 



tracks* with aach 



3 
•o 



OFOF 

OFOF 



3F13 
0F16 



ED*30FEF 



;Eitry 

;bc 


FWA of b 
JBUF+0 = 
;3UF+2 = 

;S4VTa< = 


;exit 

;n3ne 






PR DC 




STO BCOMAOR 



OW length 

beginning of data 

THE TRACK TO BE FO?M»TED 



sselect orive 



:d71oe 

3831 »0Ft9t 



CALL 
JRC 



SELO'iV 

SERROR 



;TEST pOR 5TEP OR NO-STE? 



OF 18 


2115EF 


LOK 


HL.S4VTR< 


OFIS 


340121 


LD 


A.O.TRXR 


OFIE 


3E 


C«P 


[HL] 


DFIF 


2317 'OFBeS 


JRZ 


:l 



JSTE' IN CIE TRACK 



0F21 3A13EF 

0F24 F610 

0F26 3213EF 

DF29 CDODOD 

0F2C F5 

0F2D 3A13EF 

0F30 E603 

0F32 3213EF 

0F35 Fl 

0F36 3811 »0F*9t 



0r33 2A0FEF 

DF3B '^E 

3F3C 23 

3F3D 46 

3F3E 23 

DF3F 220FEF 





LD 

IRl 
STD 


A.SE^DEL 

0001.00003 

4.SEK0EL 




CALL 


STEPIN 




PUSH 

LD 

ANI 

STO 

POP 


4F 

4,S£<DEL 

0000.00113 

4.SE<DEL 

4F 




JRC 


:£RR33. 


SET 


"0M4DR" 




l: 


LD 


NL.Di^AOR 




LD 
INC 

LD 


CtCHLl 

HL 

3,tHL3 




INC 
STO 


HL 
HL.0><4DR 



;SAVE ac 



;track RE3 

;IF SAVTR< AMD T?4:< .?E3 ARE THE SAME SKIP THE STEP 



;UPD4TE 

SSET UP SE<OEL 



;SiVE FLAGS 

;only spead left 
;reset sekoel 
;resT3RE 



;get 4do^ess 



SBC 



LEMTH 3F FOR'IAT OATA 



;SET DMA 



;f3Rmat track 



S0;?CI«1 803x Assembler ver 3-5F <:/55/7= =9:92 Pigs 153 
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O 

o 



o 
o 

3 
■o 



3F42 


cooioe 


:all 


FMTTRK 


3F45 


3S02 *0F49t 


JRC 


:ERR3:? 


OF*? 


4F 


XRA 


A 


3F48 


C9 


RET 




3F49 


3EFF 


:E^R3^: LDK 


A,DFFH 


OF*S 


37 


3RA 


A 


0F4C 


C9 


RET 





3F*0 HC30:T: 

;IF "ESC" IS PRESSED IM IESP3NCE TO THE FIRST PR:;>4?T Tms IS THE PLACE TO PUT A COLD 330T LOADER OTHER 



o :THAM THE FLCPPY ONE SUPPLIED. 

■g SENTRY 

g ;n3nf 

o 

^ ;exit 

?NDN: 
0F4D PRQC 

DF4D C30000 JMP START 

= 0F5D RLXA = * ;lWA OF R0>1 RESIDENT CODE 

«S3 'LENSTH of this ROM IS = '.RL^A-l 
'LENGTH OF THIS R0>1 IS = 0F4F' 
= DOOO IF RLWA > 0FF3H 

.9 ERROR CODE TOO LARGE.. 

ENOIF 

ECHO OFFFH-RLi*A ! D8 OFFH 

ENDM 

; END 



TO ERRORS. '+72 Labels. 5770h bytes not ussd. Program LKA = 3FFFT. 
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O 

I ACIAD 5FC1 3S 6 115/15 

=. a:ISTA DBE8 17/ 5 116/12 117/1«- 119« 2 

1 ALP^Kr 0033 ?# 9 77/55 

9 a:P»( 02A1 20/ 3 22* 2 

g BELCNT EF6S 2*51 45/10 67/30 

" BIOJP 0093 12/ 3 12# 8 

g B<S 0008 1«55 33/ 9 

§■ B^TBIT OOSO 2#12 38/13 53/17 60/16 

3 C&LC 05D4 53/ 7 54/ 7 55» 2 

n C3ELL 0037 1«19 33/12 

CBOOT 0255 7/36 7/40 16/ 3 19* 3 
■o CCPAD^ EF02 3#13 12/ 3 20/14 21/17 

1 CCRA 2901 2*25 92/13 92/40 93/15 



CCRB 



_«,.,„ 2903 2*27 92/22 92/53 95/22 95/24 95/23 95/43 

o 95/50 95/54 96/23 96/25 96/29 99/24 99/25 

99/30 

C'HKEY 0752 70/27 74<f 2 

CI 0373 7/30 16/11 29* 2 

CLRLN 3661 46/ 5 51/ 6 53/ 3 60* 2 61/4S 

C3UT 33E0 14/29 14/32 16/12 34# 2 

CaUT2 341A 32/25 36« 2 

CPO^A 2900 2*24 2/25 2/26 2/27 2/28 2/30 2/31 

2/33 92/17 92/21 93/11 94/15 96/34 97/29 

98/ 3 99/33 99/55 101/14 

CPO^B 2902 2*26 92/26 92/30 93/12 94/13 95/15 96/15 

97/16 99/16 101/16 101/22 
C^ OOOD 1*52 7/35 13/ 2 13/10 18/20 13/28 lB/40 

13/43 33/ 7 33/ 7 

CTLKY 0002 2* 8 77/49 

CTLTB 0924 34/ 6 88*46 

CURS EF54 2*55 34/40 49/43 

C\^2IP 3330 110* 2 112/ 7 

CV2CP OBOE 109* 2 111/ 7 

O.CMD^ 2100 2*18 2/19 2/20 2/21 2/22 143/15 

D.DAT^ 2103 2*22 129/19 138/51 149/22 150/2? 

D.FINT OODO 5#11 143/14 

D.ROA OOCO 5* 3 138/18 

3.R3S 0030 5* 6 121/17 134/12 137/25 

D.R3T OOEO 5# 9 140/12 

D.S^C^ 2102 2*21 136/13 139/11 

O.SEK 0010 5* 2 129/21 

O.STP 0020 5* 3 130/15 

D.STPI 3040 5* 4 131/15 

O.STPD 0050 5* 5 132/16 

D.STSl^ 2100 2*19 123/23 123/31 133/27 137/48 13»/33 139/ 2 

141/57 144/15 147/17 149/14 150/13 

D.T^K^ 2101 2*20 127/15 129/14 139/12 152/28 

D.W.^TS OOAO 5* 7 122/17 135/12 

D.W^TT OOFO 5*10 141/24 

D&CTVE FF6A 2*60 144/48 145/44 

□ BCT 0001 2# 4 73/24 

D3RV DF35 67/53 151* 2 

DELAY 00:F 15* 2 145/37 145/39 

0IM3IT 30D0 2*13 40/43 

OISDIM Tiac 5*21 5/13 33/15 43/45 53/19 53/18 53/17 

64/2? 65/28 
0«ADR E<=3F 2*45 19/26 22/21 24/57 26/ 7 137/17 140/20 

141/33 152/18 152/50 152/57 

0"IA^O 0F3A 16/55 137/27 138/55 140/21 149# 2 

OMAWRT DE=0 16/54 137/29 141/39 150* 2 



SQ^CIM S08x issemblar 
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O 
o 



D'^A'W 


303C 


77# 5 


82/19 












03HCME 


083E 


32/23 


e7# 2 












ODLF 


063* 


47/10 


51* 2 












00LF2 


0.6 5 7 


49/24 


614(16 












OSKSHP 


EFC7 


3S 3 


7/34 


145/17 










0STS3 


EF39 


2*'*". 


125/57 


126/13 


125/27 


133/28 






EBOQT 


OOAD 


13# 6 


19/20 


19/35 


2 2/33 


24/52 


26/23 




EDELC 


3542 


32/19 


53* 2 












EEOL 


053A 


32/22 


51# 2 












EFAD^ 


0010 


30# 6 


52/ 7 


52/17 










EFESC 


0038 


33# 7 


3 4/43 


36/ 9 


52/ 7 


52/17 






EFG^ 


0031 


33#10 


30/11 


56/ 7 


55/20 








EFHA 


0032 


30* 9 


30/11 


56/10 


56/23 








EFMSK 


0037 


30#11 


3 5/6 


42/41 


52/ 5 


52/15 






EFSCR 


0020 


33* 5 


52/17 












EFUN 


0004 


30# 8 


30/11 


56/13 


55/26 








EI*1SRT 


353B 


32/13 


54i» 2 












EMBOOT 


OOAO 


13« 2 


13/13 












ENA3I1 


Tiac 


5#16 
65/26 


38/13 


40/43 


53/16 


50/16 


53/15 


54/26 


E?C 


007F 


1#54 


BS/ 5 


33/ 5 


33/ 7 








ESC 


OOIP. 


1#53 


7/31 


18/ 4 


18/ S 


18/12 


13/12 


18/14 






13/16 


18/13 


18/13 


18/22 


18/26 


18/30 


13/32 






13/33 


18/35 


18/36 


13/33 


13/42 


13/46 


13/51 






18/53 


34/49 


83/ 5 










esc:ad 


3591 


32/ 3 


5 2j( 2 












ESCCGR 


05r4 


32/11 


56#20 












ESCCHA 


05F8 


32/13 


56«23 












ESCCUN 


35FC 


32/15 


56*26 












ESCEE 


0631 


32/20 


57i« 5 












ESCH 


EFSO 


2#57 


34/41 


36/10 


37/19 


42/44 


52/ 9 


55/17 


ESCHT3 


0384 


31# 5 


35/ 5 












ESCLCIC 


3580 


32/23 


5 0* 2 












£SC=IR 


0631 


32/21 


57# 2 












ESCSAD 


3593 


32/ 9 


5 2#12 












ESCSGR 


05E4 


32/10 


56# 2 












ESCSHA 


a5E8 


32/12 


55«10 












ESCSUN 


35EC 


32/14 


56#13 












ESCJLK 


0533 


32/24 


50S 9 












ESCZZ 


D51F 


32/17 


56#31 












FDSK 


3E*B 


123/17 


13 3/16 


137/ 4 


133/20 


140/14 


141/29 


144S 2 


FmTR< 


OEOl 


17/ 3 


141# 2 


152/51 










FDRINT 


3636 


6/ 8 


16/61 


137/45 


138/45 


143S 2 


144/19 




FORMAT 


OFOF 


16/32 


152* 3 












FWAVM 


FOOD 


3#22 


46/ 4 


45/16 


61/21 








G<EY 


06 = C 


6/27 


67* 3 












STMAS< 


07F6 


74/17 


74/21 


75# 2 










H.KEY 


2200 


2#23 


76/12 












H.SCTR 


2A00 


2#34 


115/12 


115/16 










H.SREC 


2A01 


2*37 


116/19 












rt.SSTS 


2A0O 


2)*35 


119/19 












H.SXMT 


2AD1 


2«36 


113/15 












H.VID 


2C00 


2»3S 
119/14 


9/15 


10/28 


10/32 


11/13 


11/22 


59/10 


h:b3ot 


0F40 


7/32 


153#13 












HWSCRN 


0056 


77# 6 


82/22 












HDHE 


3C33 


lS/56 


120/19 


125/53 


12S# 2 








HSTACT 


EF50 


2#51 


27/ 4 


27/ 8 


27/ 9 








IE. CO 


3936 


7/ 3 


15/37 


92S 2 










IE.3TS 


09SC 


1&/39 


94# 2 
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lE.IDM 


0A3D 


15/*3 


99# 2 


105/15 








IE.3DH 


39FB 


lS/*2 


97« 2 


107/21 








lE.OJM 


09D8 


16/*1 


96# 2 


105/ 8 


105/27 


107/13 


107/30 


lE.PP 


DA99 


16/** 


101# 2 










lE.SHIC 


0AD7 


95/18 


96/37 


97/19 


97#25 






IE. SI 


D979 


16/38 


93# 2 










lE.TC 


D998 


16/*3 


95* 2 










lEiDRS 


EFDS 


3#16 


105/ 5 


107/10 








lECHA^ 


EF3C 


3rfl7 


10*/15 


105/21 


105/33 


106/10 




lEIlO 


0A5A 


10*/17 


105# 2 


105/10 








IEI20 


oa:6 


105#12 












IEI30 


DACE 


105/17 


105i«21 










IEI*0 


DA31 


105#23 


105/29 










I El HP 


OAEl 


17/10 


106# 2 


106/ 3 








lEINST 


DA31 


17/ 8 


10*» 2 


106/ 7 








lELST^l 


3320 


*#31 


107/11 










IE005 


OAEE 


107»10 


107/15 










lEOZa 


OArO 


107#20 


107/2* 










IE040 


3335 


107#26 


107/32 










lEOSTA 


SAAE 


17/ 9 


103# 2 










lEajT 


OAEO 


17/11 


1074 2 










lESTK 


EF6F 


3# * 


67/1* 


58/23 








lETALiC 


QOVO 


*#29 


105/ 6 










lEULST 


003F 


4#32 


107/29 










IEUTL« 


005F 


*#30 


105/26 










I«1SG 


019F 


7/25 


18# 2 










INT3L 


EFFO 


3#21 


5/22 


5/28 








li^PTCT 


0018 


2# 5 


7 0/*7 










ISTiC 


EF99 


3# 5 


67/15 










KBDRV? 


a7*E 


68/ 5 


70# 2 










k3s:am 


3786 


73/12 


72# 2 










KBSERV 


3839 


70/53 


77« 9 










k:olh 


3037 


2# 3 


70/52 


72/53 








KEYl 


0338 


77/56 


79« 2 










KEY2 


3Bit4 


77/53 


80i< 2 










XEY3 


3652 


80/ 7 


31« 2 










)CEY3A 


3857 


31#10 


8*/10 










KEY* 


385A 


77/50 


82« 2 










KEY5 


087A 


S2/26 


82/29 


83# 2 








KEYS 


3836 


83/ * 


e*s 2 










KEYE 


383* 


77/30 


78* 2 


79/ * 


79/ 7 


79/10 


83/12 sl/11 






82/32 


83/ 7 


8 3/10 


3*/ * 






KEYLCK 


;F59 


2#5* 


5/50 


2 8/9 


50/11 


58/ 3 




KEYLST 


EF34 


3#1* 


70/15 


72/51 








KLELEM 


0002 


1#59 


70/58 


73/ 3 








KLLEN 


3003 


1#5B 


70/17 


72/53 








KLUStD 


0037 


1S60 


70/2* 


72/55 


73/22 






KRQWH 


0038 


2# 2 


70/52 


72/53 








KYCOTB 


333* 


77/26 


3B# * 










KYS^IVS 


3036 


1#61 


7 0/** 


70/*5 








LST^K 


SF5E 


3# 3 


27/17 










LF 


303A 


1«51 


13/ 2 


18/ 2 


13/ 2 


18/ 2 


18/ 2 18/10 






13/20 


18/23 


is/*o 


18/*8 


18/*8 


13/*3 33/ 3 


LFTARtJ 


3030 


77« 2 


3 2/10 










LIST 


3B39 


15/13 


15/1* 


118# 2 


113/12 






L<EY 


EF5E 


2#56 


2 3/13 


29/15 


29/18 


70/19 


73/ 5 


LLIIIT 


E=5C 


3# 2 


7/15 


**/25 


*9/16 


60/19 


51/35 


L3GSEC 


FF56 


2«53 


27/ 3 










LDOICUP 


3**0 


37/2* 


39# 2 


39/23 








LVMEM 


1030 


1#*7 


*5/ 6 











o 

o 
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MCRIGH 003C liKZl 33/10 

MCU? 00D3 1*20 33/11 

N>ili 0066 1#45 3/ 4 

N^eTRY 303A 2#14 120/14 123/17 123/48 

nuhse: efca 3# 9 123/15 123/37 124/ 6 

OPAO 3079 7/13 lOS 2 41/34 85/16 87/10 14S/23 

QP3D 3035 7/ 3 11* 2 34/33 41/20 45/ S 46/13 51/59 

67/43 36/17 143/15 151/11 

OST.^ 0030 7/26 14# 2 14/36 

PA.CD^ 0024 4# 4 109/13 110/13 

PA. COT 002E 4* 5 109/13 110/13 

PA.CTL 2901 2*30 109/14 109/19 110/14 110/19 112/12 

PA.Dn 2900 2l»29 109/16 110/15 

PA.ORI 0000 4#13 110/15 

P4.3R0 90FF 4ii)12 109/15 

PA. OTA 2900 2#28 2/29 113/12 114/12 

PARINP OaSE 17/15 113* 2 113/ 8 

PAROUT 3B9D 17/16 114* 2 114/ 8 

P3.Cp^ 0030 4# 7 109/21 110/21 

Pa.Cui 0004 4# 8 109/26 110/26 

P3.CTL 2903 2#33 109/22 109/27 110/22 110/27 

PB.DIR 2902 2#32 109/24 110/24 

P3.0R 303F 4#14 109/23 110/23 

P3.0TA 2902 2*31 2/32 109/29 113/29 111/ 3 114/14 114/16 

Pa. DTI 003S 4*16 110/28 

PB.0T3 3032 4K15 109/28 114/13 114/15 

PIAAD eF51 2#58 10/31 41/30 85/12 87/ 6 145/16 

PIA33 EF52 2#59 11/21 34/26 41/16 42/25 43/ 9 44/32 

45/ 5 45/10 57/23 61/26 61/49 57/40 85/ 7 

87/12 145/27 143/11 151/ 3 

PIACTL EFOD 3#13 112/ 8 112/13 113/11 

PIS20 0B5S 112/10 112*18 

PISTAT 0373 17/13 112« 2 113/ 7 

n P3S10 3S77 1H#14 

POSTAT 3350 17/14 111» 2 114/ 7 

PP. IN 3002 4#25 110/ 8 110/31 

PP.IRO 0080 4#19 112/ 9 112/15 

P».>)00 EF3£ 3#19 109/ 7 109/32 113/ 7 110/32 

PP.3R0 0040 4#18 111/ 9 

PP.3UT 3001 4#24 109/ 8 109/31 

PSE<C 3D15 129/22 130/17 131/16 132/17 133# 2 

PSTESC 3425 34/44 37» 2 

RAD^ 30A5 15/25 123/27 123/51 125/32 126/21 133# 2 

ROROM 0830 72/13 72/17 73/38 7 4/24 76« 2 77/35 77/40 

RDRV 3C32 15/19 19/15 22/34 120» 4 

RDS<0 3ECF 145/35 148# 2 

ROW^T 3D3C 123/38 134/15 136# 2 

READ 0C30 15/23 134# 2 

READER 33JF 15/15 116# 2 116/14 

READT^ ODEB 17/ 2 140# 2 

R<EY 3373 29# 3 29/12 

RtMA 0F50 153#27 153/30 153/31 153/35 

ROHJPl 3093 12# 2 16/30 63/14 

RDHJP2 0098 12# 6 16/31 

ROM^AH EFD8 2»44 63/12 

R0MST< EFCl 3«! 7 5/7 

R3H0M 0031 1*141 72/16 

RSE: OCIC 15/25 19/33 24/49 25/25 121# 2 

RTARH D03B 77# 3 82/13 

RTRy EF35 2«43 120/15 120/22 123/18 123/43 124/ 4 125/19 
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O 
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o 

O 
o 
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RHC3H 
RrfSEC 
S«VSEC 
SAVTR< EF15 
S&VTYP EF30 



EFJl 
0C28 
EFl* 



s:lfre 00^5 
scrsem d*t4 

SCT^K* aC31 
S5tSK EF17 
SEEK DC^A 
SEKDEL EF13 



SELDEM 

SELJRV 

SEMDEN 

SEQ 

SERFL3 

SETXY 

SHFTKf 

SHFTTS 

SI. MRS 

Sl.RRO 

SI.S16 

SI.TRD 

SIRST 

s<Eir 

SLDl 

SLD2 

SLDXCT 

SLIDED 

SLI3EL 

SLIDES 

SLIDEU 

SLRl 

SLR2 

SLST 

SPAQ 

SRPTCT 

START 

STEP 

STEPIN 

STEPaU 

STODIH 

STR3 

TAB 

TEH 

TOT^OiJ 

unase: 

U-JCJR 



0EA6 
0E71 
DCS9 

zf;c 

EFDA 

3*9E 

00D4 

D9DC 

0057 

0031 

0055 

0032 

3BJ2 

03i6 

08AC 

0837 

3033 

384A 

3891 

3395 

38A6 

3397 

389F 

0330 

3058 

0006 

3000 

0039 

0030 

3011 

36:6 

3020 

0009 

EF30 

0037 

EF55 

36F6 



003A 
3038 
3010 



UPARki 

VALCT5 

VALETS 

valid: 33:6 

VALIOE 0394 
V8RIGH 3*3B 

VC40 

v:b5l 



3030 
353F 



125/*6 
3#12 
121/20 
2#'f3 
2#*9 
3#11 
141/15 
1*50 
41« 2 
17/ 5 
2#50 
16/57 
2#47 
152/36 
145/14 
17/ 4 
15/29 
3#10 
3#15 
37/13 
2#10 
81/ 7 
1#*2 
l(ft4 
1#*3 
1#*5 
7/21 
15/10 
85/ 3 
86«15 
2#11 
S2/20 
82/11 
82/14 
82/17 
85/ 6 
35#20 
15/23 
5/59 
2# 6 
5(f 3 
16/58 
16/59 
15/50 
15/50 
4#20 
1#56 
2#42 
2# 7 
2*52 
42/12 
57/17 
77# 4 
33*18 
32S30 
33« 2 
32# 2 
38#11 
1«27 
33/13 



126/16 
121/18 
123* 2 
19/31 
24/ 5 
22/ '+6 
144/25 
15/13 
42/16 
127# 2 
22/24 
123/32 
6/57 
152/41 
146# 2 
120/16 
19/17 
67/57 
115/16 
42# 2 
77/52 
88#34 
115/11 
115/13 
7/20 
117/15 
15/36 
28# 3 
8 6« 7 
37/16 
85/23 
86» 5 
SSH 4 
85** 9 
86* 2 
85#12 
85/13 
117» 2 
9* 2 
70/50 
7/42 
130* 2 
131« 2 
132# 2 
53# 2 
114/13 
38/ 5 
22/25 
72/23 
27/14 
43/ 3 
61/14 
82/16 
38/21 
37/22 
33/13 
32/30 
40/15 
32/ 7 
45# 2 



125/49 

122/13 134/13 135/13 136/50 137/24 

22/28 25/20 136/17 

24/51 25/13 127/14 129/15 152/27 

125/33 125/40 126/ 3 125/ 5 135/25 
146/22 



145/15 
129# 2 
128/14 
152/43 

123/22 
22/35 

67/59 
118/17 

92/25 



115« 2 
29/11 



128/27 133/12 133/23 152/34 



125/29 145* 2 152/22 
125# 2 



119/24 119/27 



118/11 

8/ 6 153/24 
152/38 



23/13 24/15 24/34 25/33 
72/23 

44/ 5 44/14 47/ 3 48/ 5 54/ 5 

66* 2 



38/20 
37/21 



SO^CIM 808x Assembler y^er 3.5E <:/55/7= =9:92 Pajs 159 
^^<^ ST3R&3E .0:An3N5 B:R3M141 .43") 



O 
o 



O 
o 

3 

T3 



O 
O 



v;3<s 


Dl-iZ 


'33/10 


44«11 










VCCLRS 


D51F 


33/14 


46# 2 


55/31 








vcc* 


35^0 


33/ 3 


474 2 










VLE3L 


30 54 


1*33 


32/Zl 










VCHaME 


04:S 


33/15 


43# 4 










VCLr 


35*9 


33/ 9 


47« 9 










VCL?S 


OOIA 


1#22 


32/15 


33/13 








VCMC^T 


D54F 


33/11 


4B« 2 










VCMCUP 


3439 


33/12 


44# 2 










V3ELC 


3057 


1*30 


32/18 










VDELL 


3052 


1«32 


32/20 


57/23 








VECTOR 


0413 


35#12 


39/13 


39/25 








VEGH 


30if7 


1#39 
18/45 


18/ a 
3 2/10 


18/12 


13/18 


18/26 


13/32 


VEHI 


0028 


1#35 


32/12 










VEUL 


005D 


1#37 


3 2/14 










VFL3 


FFEA 


1#48 


7/12 


41/24 


87/ 3 






VGR&PH 


3554 


31/ 7 


49# 2 










VHA5;i 


04S9 


31/ 9 


40*39 










VHALF 


3455 


31/ 9 


40*32 










V^-iu-iE 


OOIE 


iw23 


3 3/ 14 










vin: 


3051 


1«29 


32/17 










VINL 


0045 


1#31 


32/19 










VLDDl 


05:e 


15/48 


54/14 


57/45 


54* 2 






VLDI* 


36E2 


15/49 


45/ 9 


53/11 


53/15 


60/37 


65* 2 


VLL 


3050 


1#49 


7/15 


27/16 


44/ 7 


44/23 


44/38 






55/ 6 


57/42 


58/ 9 


59/13 


60/23 


51/17 


VLOCK 


0023 


1«25 


32/22 










VMO^H 


3437 


31/ 5 


3 8* 2 


40/ 9 


40/22 


40/35 




V0UT8 


D55E 


38/17 


40/46 


48/ 7 


49/ 4 


49/ 6 


49# 9 


V3UT85 


3572 


49/19 


49*27 










V3UT90 


3573 


42/45 


44/20 


44/44 


45/17 


47/ 7 


47/11 






49#31 


51/ 9 


5 3/22 


55/13 


58/ 5 




V3UT96 


3575 


49#37 


5 4/19 










V0UT97 


0578 


33/15 
55/18 


36/11 


45/11 


49*44 


49/50 


50/12 


V»T3FF 


EFEF 


3«20 


34/29 


41/15 


45/15 


61/56 


87/15 


VSAO 


0053 


1#28 


32/ 3 










VSGH 


0047 


1#38 
13/42 


18/ 4 
32/ 9 


18/12 


18/18 


18/22 


18/30 


VSHl 


0029 


1*34 


32/11 










VSUL 


306C 


1#35 


32/13 










VJi^DEl 


3457 


31/10 


40* 5 










VJN3R 


0458 


31/11 


40*13 










VUNHA 


045F 


31/12 


40*19 










VUNHAG 


0453 


31/13 


40*26 










VUNLK 


0022 


1#25 


32/23 










t<300T 


029C 


15/ 9 


21* 2 










W5USY 


DE38 


128/20 


133/19 


137/44 


138/59 


143/25 


147* 2 


H^ITE 


0D37 


15/24 


135* 2 










WSEC 


0C23 


15/27 


122* 2 











18/33 



46/ 5 

49/52 
49/25 

52/10 
13/36 



o 

o 



SO^CIM 808X assembler ver 3.5E <:/55/7= =9:<32 Pn-is 1 
Dsborne CP/H 2.2 C3iaS Rev 1.4 C.-OCC^AM25. i5« 

»A5S 3000 ?F=0 

*C3CE EFFO OODO 
*D1T« FFFO 30 00 

;.3ate: 6/4/B2 

;.4jthor: R3gar W. Chaoman 

!. Title: Dsborne C?/M 2.2 :SI0S Rev 1.4 

t.CoTiments: 



* F3II USE WITH 0CCTXT6.AST ONLY 



*N3TE* 


PdR USE W 


» 


<fD230T-00 


» 


202007-00 


* 


102007-00 


» 


*01007-00 


* 


201007-00 



PIASTER 


• ASH 


ASSY 


• ASM 


LISTING 


.PRN 


FASTER 


• C0«1 


ASSY 


• COM 




::oByri9ht 1932. nsDOrne. 

T^iis product is a copyright prograri product of 
Dsborns and is s'jpolied for use with the Dsbone 



= 0015 



^E^S: 



22 



LI"JK 


CCCSni5.A3M 


; Jufi\ 


LINK 


0CC3I025.ASM 


JKsy 


LINK 


0CCBI095.ASM 


;cp/ 


LINK 


0CC3I335.ASy. 


:rom 


LINK 


0CCBn45.ASM 


INpn 


LINK 


QCC3I355.ASM 


Jcol 


LINK 


DCC3I065.ASM 


;Dis 


LIM< 


aCCBID75.A5M 


;uti 


LINK 


0CC3IlB5.t5M 


:iob 


LINK 


0::*A«115.A5M 


:3io 


LINK 


0:CSA»125.iS«, 


;Corn 



Tao I 3 

traTslation £ i t i ti a I i zat I on valuBS 
H disk tables 

cal 1 interf ac3 

data transfer diSK 
d and itarv boot 
< data transfer I/j 
I i ty r ojt i nes 
yts .1 i spatch tao I a 
s ra-n 3ef i n i t i ons 
^OTi raTi definitions 



Sa^CIM 833x SssemDlsr ver 
3sborne 0°/M 2.2 CJIDS Rev 1.4 



<:/55/7= 



=?:92 Paja J 

C:OCC1t315.4S1 



= 3033 


M3!Z=: 


= C3')CI 


:CP: 


= E130 


3ns: 


= D3r)6 


SDOS: 



59 

0C3OBH 
CCP+l&OOn 
oco+306h 



; I ocit i OT 3f 



O 
o 
3 
■o 



MSG 'DOT fl (relocation value) = '.lF?0^-3ns 

■ODT R (relocation valjs) = 3E30" 

MSG Mssembli'i ig 3I0S for LirJft of ". LW4>1E/'lt ' -i. • 

•4ssemDl/ing 3I0S for L>J4 of FFFFh.' 



:p/m to host 3is< constants 



D^OO 


HSTSIZ 


0010 


FP^sia 


0038 


FPrDI3 



2044/1 2S 
1024/12=1 



;3I ocki ng/33D I oc-< i ng bjffer size 

ssectors ii floooy di3< oIog< (Csborne single iensit/ Dioc'c size = 2C) 

;Sectors in flopoy disk aloct (Osborne douole densit/ olock size = 1«) 



r;p/M disk control Diock equates uhion define the 
aisK types and naxiT.u.ii storage capability of eacn 
dis« type. 



0035 


DS<Sl: 


ooo: 


DS<Dl: 


0001 


K5^0X: 


0033 


I3M: 


0038 


Dt:: 


002E 


513S>1: 


0039 


OlDS'l: 


0053 


XXOS": 


oo?c 


13«DS.M 


OO&B 


oe:dsm 



3300 
0001 
0032 



5 

OCh 
1 

? 

8 



SSingle density ( 256). single sided. 

;D3uble density (1024). single sided. 

;Single density ( 123). single sided. 

;D3uble density ( 512). single sided. 



((40-3l*2*10)/FPrSI3 
((40-3)*3*5 )/F?YOIB 
((40-3)*l*13)/FPY0IB 
((40-l)*4*3 )/FPYDIB 
((40-2)*i^-9 )/FPYDIS 

B03S constants on entry to write 



bIRALL: = 
(JROn: = 
hlRUAL: = 



;wr i te to all o;ated 
; write to directory 
Jwrite to unallocated 





' 


S3M equates. 


0000 


FN^O>fl: 





0031 


01 50".: 


1 



;Port to enaole ^0'^ 
iPort to disable ^j^ 



3sDorn= CP/H 2.2 



SO^CIM 803)! ftssemblsr ver 
cans Rsv 1.4 



3.5E <:/55/'7 = 



=9:92 P33= 3 
C:0CC3ID15.1S>< 



O 

o 



3000 
0000 
00 00 
OODO 



NDSK: 

MOFDD: 

ALVSZ: 

:svsz: 



DP^GEN 
MD3K: 



SOFOO: 
CSVSZ: 
&HfSZ: 



Macro for geTeratiTg Control 3loc<3 for disk driv^es 
The for.-nat of th = 38 disk control blooks 3r3 as follo-vs: 
bits 



16 
*8 
15 
16 
15 
16 

SET 

SET 
SET 

SET 



LIST 

SET 
DW 

DW 
OH 
DW 

ow 

DW 

SET 

SET 

SET 

ENOM 



-> traTSlation table, 
oits = Work area for 0°/".. 
bits = -> 0IS3U=. 
bits = -> "araneter block. 
bits = -> check vector, 
bits = -> allbcation vector. 








TY 

NO 

xz 

0, 
'43 
?A 
CS 

4L 
NO 
CS 
AL 



SNjjTiber of iis-i. drives 
;Nj7iber of flooDy disk d'i^es 
SAIIocatioT vector size 
JChsok vector size 



= f,>CLar£,0!RSJF,DP3A0R 
SK + 1 



0.0 



V+CSVSZ 

V+ftLVSI 

FDD+1 

VS^+(6l^/'^) 

VSZ+t ( 010SH+7)/B) 



i^acra for geTerating the DisK Paraneter 31oc<3. 

DisK type definition blocks for each particular node. 

The format of these areas are as follow: 

3 bit = disk type code 

16 bit = Sectors oer track 

B bi t = Block sni ft 

3 bit = 3S -nask 

3 bit = Extent nask 

15 bit = Disk size/lOZif - 1. 

16 bit = Oirectory size. 

16 bit = Allocation for directory. 

16 bit = check area size. 

16 bit = offset to first track. 



OPSGEN MACRO 
OB 

OW 
OB 
OM 
DM 
DW 
ENDH 



TYPE, SPT,33H,BS'«,£XM,0SH.0!RSIZ,4L\?MSK. OFFSET 

%2 

?3,%*,iS5 

?5-l,?7-l,?ev (i?8) 

UT + S)/* 

?9 



S3^CI>< BOSx issambler ver 
ashorne CP/M 2. a C3I3S Rev 1.4 



3.5E <:/55/7= 



:9!92 Page * 
C:aCC9I315.43H 



Tne following juno tasle dsfines th9 sntry oaints 
into the CB13S for use by CP/M and otl=r extjnal 
routines; tharfore the order of thsse juTip omnot 
be -nodified. Ths location of these junps oai only 
03 lodified by *:Dh locations^ whioh is a restriotioT 
of MOVCPM. 



0000 



E130 



ORC 



BIOS 



O 
o 

3 



o 
o 



ElOO 


C3EDE4 


E103 


C313E5 


ElOS 


C32EE7 


E109 


C333E7 


ElOC 


C338E7 


El OF 


C33FE7 


E112 


:355E7 


E115 


C35CE7 


E118 


:33FE3 


eiis 


C350E3 


EllE 


C35B£<f 


E121 


C3CEE* 


E12'i 


C3D3E4 


E127 


C331E5 


E12A 


C3CEE5 


El 20 


C3S3E7 


E130 


C3D3E4 


E133 


:3FEE2 


E136 


C319E3 


E139 


CD12E3 


E13C 


:;D12E3 


E13F 


C012E3 


El-tP 


CD1253 


E145 


CD12E3 


El*3 


:012?3 


E1A^9 


C012E3 


E1<^E 


C012E3 


E151 


C012r3 


E15* 


:D12?3 


S157 


CD12E3 


E15A 


CD12c3 


E150 


CD12E3 


E160 


C33CEI 


E163 


C3B3Ea 



RRI: 



JMP 


:3aQT 


MP 


WS03T 


JMP 


C3NST 


JMP 


C3MIM 


JMO 


:ONQUT 


JMP 


LIST 


JMP 


PUNC^ 


JMP 


;?EADE^ 


JMP 


HOME 


JSP 


SELOSK 


JMP 


SETTRI^ 


JMP 


SETSEC 


JMP 


SETD^A 


JMP 


JEAD 


J«P 


WRITE 


J»«P 


LISTST 


JMP 


SECT^N 



FMTJ: 


CALL 


RDMCDE 


SBAUD: 


:all 


^OMCOE 


; 


IEEE- 


489 vector 


IE31Z: 


CALL 


^Of^CDE 


IE32:: 


CALL 


ICMCiE 


IE53:: 


CALL 


RC^CDE 


IE34:: 


CALL 


■^OMC^E 


IE35:: 


CALL 


RQMCDE 


IEB6:: 


CALL 


f(Dv.CDE 


IE37C: 


CALL 


^OMCDE 


ie33C: 


CALL 


SDMCI^ 




CALL 


i^OMCOE 




CALL 


^DMCCIE 




CALL 


rcmc:e 




J.-IO 


ACICTL 




JMP 


ACISTAT 



;Cold boot 

;Warii boot 

;Console status (iioJt) 

;Console inojt 

;Consol9 ojtout 

;l i st outo jt 

;Punch ojtout 

;5eader inout 

?Set track to zero 

:Select iisk unit 

;Set track 

;Set sector 

;Set Dis< '^etiory Address 

;Read fro-n dis< 

;iJr i te onto di sk 

saeturn LST: devio; stitjs 

;Sector translation rojtina 



:Rom res i dent cat I 



;Control 3jt 

SStatus In 

;Go To Stanioy 

;Ta><e Control 

;3utDLit Interface Message 

;3utout Deviae ^lessage 

:lnout Device "essaje 

;Paral I 9 I 'oil 



; ext ens ions 
; for 

; iieTior /-■naoDsd 



i deo 



;hook for serial co-miand oort ^rite 
;hook for serial status aort read 



o 

o 



O 

o 
3 
■a 



SO^CIM 808x Sssemblar i^sr 3.5E <:/55/7= =9:97 Oags 5 
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E156 «^0 

E167 30 

E168 FF 

E169 55 

E16A 80 



r«**t*««.*>i 



This area is reserved data storage area for 
the set-up orograii to install orinter driver3» 
function keys» ajto boot command, iobyte valje. 
and auto horiZDnta! scroll flag 



I > • 9 • « « > t 



I05ITE 



33 



PRNTER: 3B 



*0h 



OOh 



iHSEMS: 


DB 


TRUE 


BRSTE: 


D3 


SI. 120 


SC^SZE: 


D3 


123 



;def3ult to serial or i nt3r==<fO>i 

; oaral lei pr i nter = 8Dh 

: IEEE printer=c3h 

;default to standa'd serial=0 

SQu^e ETK/4C< =1 

;Oiablo KDM/X3PF =2 

•auto horizontal scroll snable 

;default baud rate = 1233 

Jdefault screen size = 123 



cl68 


A5E1 


XLT3L: 


DW 


CNTRLO 


E160 


A6E1 




DW 


CNTRLl 


E16F 


47E1 




OW 


CNTRL2 


E171 


43E1 




DH 


CMTRL3 


E173 


A9E1 




OW 


C^TRL'► 


E175 


AAtl 




OW 


CNTRL5 


E177 


4BE1 




DW 


CNTRLS 


E179 


ACEl 




OW 


CSTRL7 


E173 


4DE1 




OW 


CNTRL3 


E17D 


AEEl 




OW 


CNTRL9 


EITF 


AFtl 




DH 


UP 


E181 


30E1 




Oh' 


R15HT 


E1S3 


51E1 




OW 


ODWN 


E185 


32E1 




OW 


LEFT 


E187 


33E1 




OW 


ECT3L 


E189 


04 


IEEE4D: 


03 


It 


EISA 


30 


PIMTcj: 


03 





El 88 


00 


PIMIT: 


03 





E18C 


= 0010 




OS 


16 



E19C 



rl90 07 

E19£ 41555't*F53 
= 0007 



4C>^0: 



OS 



CAJTO: OB 
03 
;A'JT0L: = 



CAJTjL 
•AUTOST ' 

■-S-CALIT0-1 



JFixed lengtT taole 
;contains Dointers 
;to strings 
;to decode 
;function <8ys 



tend of taole address 

:lEEt device address 

;Flai indicates if printsr has neen initialized 

JLength of str i nq 

;Printer initialization string 

•auto coDiTiand = D ignore ajtc coot 
; = 1 ajto on cold boot 

; =~ajtoon»jarT;b30t 

; = 3 ajto on botn 

Mength of ajto conmand nere 
Sauto cOTimand goes here 



jsbona :?/« 1. 1 C^ns Rev l.t 



3.55 !::/55/7 = 



:0C: Ji:52 = 






o 
o 



■TIAS 


33 


ZHT^VCt: 


;b 


• "' 


,= 1A6 


31 


C^^TRLl : 


D3 


* 1 " 


f 147 


32 


:MTSL2: 


nn 


•2' 


= 143 


33 


:N'-RL3: 


D3 


■3' 


EM9 


3^ 


CNTRL*: 


38 


•4> 


-.lAA 


35 


:f<TRL5: 


:;3 


•5' 


ElAB 


36 


:NTRL6: 


33 


•6' 


E14C 


37 


:\TRL7: 


33 


•7' 


E14D 


3a 


:NTRL3: 


33 


•8' 


ElA; 


39 


;NTRL9: 


33 


.,. 


ElAF 


33 


■J?: 


33 


•<■-'^^^l 


E130 


3C 


WZM: 


33 


■L'-40n 


E131 


OA 


3Q*<N: 


33 


' J'-*OH 


E132 


33 


LEFT: 


33 


•H*-!hOh 




= E133 


F3TBL: 


= 


* 



;progr an. jj i th x I ttt> I 
;oointing to fie sitrias 

;3ef3ult valjss for tne 

tcontro I njusr i C3 

:5re the ojTsers ot tTs oys 



lOefault V5ljas 
;for th8 cjsar 
;kt>ys 3r; standard 
:val ues f jr :?/a| 



;133 



E200 



3RG 



BI3S+21& 



Isoace rasaverd far full fjnotion 
Wsy dscading and 16 Dyt5 auta 
Jboot conrnand 



o 

o 



SO^CIX 80-^x Assembler /s 
Os3orn= Z?/*. 2.2 C3I35 P.ev 1.4 



3.5E <:/55/7= 



= ■3:92 ?ms 1 

C:GCC3I';95.4S>^ 



Control Blocks far disk drives 



O 
o 



F200 




O^SASE: 






E203 






D'HGEN 


3SK01.DDXLTS.On3'JF,DP301 + l 




+= 0001 


NOSK: 


SET 


NDSK+l 


H200 


<-000C 




ow 


DDXLTS 


E202 


+0000003000 




OM 


0.0»0 


E203 


+ 80EE 




DW 


D!^3JF 


S20A 


+ 9FE2 




Dl« 


D? 301+1 


E20C 


+ 3CE9 




OW 


csv+:5»?s^ 


S20e 


+oc;e9 




Oh' 


ALV+4LVSZ 




+= 0001 


NO^DOs 


SET 


W3FD0+I 




+= 0010 


:s\/s?: 


SET 


CSVSi + (6V/'f) 




+= 0013 


4LVSZ: 


SET 


4LVSJ+({010SM+7)/3) 


E210 






0PH3E^j 


OS<D1.03l'LTS,DIR3UF,OP301 + l 




+= 0002 


•ijDSK: 


SET 


MOSK+1 


E210 


+ 0000 




OW 


DOXLTS 


E212 


+Q000003000 




DW 


O^Of D 


E213 


+ 30cE 




OW 


DIR9Ui= 


E214 


♦ 9FE2 




DW 


DPBOl+1 


E21C 


+ tCE9 




DW 


csv+:sy/sz 


E21E 


+ 24E9 




OW 


ALV+iLk'SZ 




+= 0002 


NQEDO: 


SET 


MOFOD+1 




+= 0020 


CSVSZ: 


SET 


t%\l%l*ibi>/W') 




+= 0030 


SLtfS?: 


SET 


ALVS? + n010SW + 7)/3) 



;Dr i ^a A; 



I Or i ve 3: 



SOilCIM S03x 4sssmbler ver 3.5E <:/55/7- -9:9Z Pjgs 3 
Dsborns CP/M 2.2 Cans ^av 1.4 C : 0C:5I :}95. 4S1 



E2Z0 



XT&e: 



;Translation table addresses 



E220 


3033 




aw 


DDXLTS 


E222 


2CE2 




ow 


XLTS 


E224 


*0E2 




DW 


XXXLTS 


5226 


0000 




DW 


IBMXLT 


E22S 


52E2 




On 


OECXLT 


E22A 


76E2 




DW 


XTRXLT 




= 0030 


DDXLTS! 


= 






iDouale d3T3ity Isaorna tranlation table address 

^Single dBTsity 3s3orn3 

;Xerox translation table address 

;I3M translation table ajdress 

;DEC translation table address 

;User defined translation table address 

;Translati on table fir 33U3LE OE^^SITy DSBQ^NE 2 tD 1 



E22C 



XLTS: 



iTranslation taole 2 to 1 



E22C 


0001040508 




D8 


E236 


32330637DA 




03 


E240 




XXXLTS: 


:x 


E240 


30350A3F 




03 


E244 


02073C11 




3B 


£248 


34090E 




03 


E243 


01063310 




33 


E24F 


33080D 




3B 




= 0300 


ni^XLT: 


= 


E252 




de:xlt: 


SDI 


E252 


0001D2D333 




33 


E265 


043536373C 




OB 



4, 5. 

6, 7, 



DEC Ti?4NSLATI0^^ T43LE 
0. 1. 2. 3, 
4, 5. 6t 7, 



10, 

12i 

14 

11. 

13 



i, 9, 
ICll, 



;XEF!DX TR&>J5L4TI3N T4BLE 5 to 1 



15 
17 



15 



12.13. 
14,15. 



16,17 
13,19 



;I8« Ti?4MSL4TI3M T43L: 



*fo translation 1 to 1 



2 to 1 

3, 9,10,11, 
12.13, 14,15, 



16,17,13,19, 
20,21,22.23, 



24,25,26,27, 
23,29,30,31 



32,33,34,35 



E276 



00 23 



XT^XLT: 3S 



40 



iSoace fjr jsar defined axDansion 
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E29E 



to 


E29E 




DPBOl! 


9 

o 


E29E 






e29E 


♦ OC 




i 


E29F 


♦ 2800 




a 


E2A1 


+030709 




o 

3 


E2ft4 


+B8003F30:0 






E2AA 


♦ 1000 




? 


E2AC 


♦ 0300 




O 

9 


E2&E 




0P3S1: 


o 


E2AE 






S 


E2AE 


+ 05 




I 


E24F 


♦ 1400 






E2B1 


+040F01 






E2B4 


+2OO03F3030 






E5Ba 


+ 1000 






E2BC 


♦ 0300 






E2BE 




DPBX3: 




E2BE 








E2BE 


+ 01 






E2BF 


+ 1200 






E2C1 


+030700 






E2C4 


+52001FD080 






£2CA 


+ 0800 






E2CC 


+ 3300 






E2CE 




DPBI3M: 




E2CE 








E2CE 


+ 33 






E2CF 


+ 2003 






E2D1 


+030733 






E2D4 


+93003FOOCO 






E2aA 


+ 1O00 






E2DC 


+ 0100 






E20E 




DPBD5C: 




E2DE 








E2DE 


+ 38 






E20F 


+ 2400 






E2E1 


+ 030730 






E2E4 


+AA003F30C0 






E2EA 


+ 1000 






E2EC 


+ 0200 






E2EE 




OPBXTR: 




E2EE 


= 0010 





; Disk t/oe dsfinitijn blocks for sach particular node. 

DPSSTART: SStart of Jis< paraiistsr oiocKst used by ssiect disK raiitine 

SOsborns Double deisityt singis sided 

0P3SEN OSK01t3*5 ,3f 7,0.D1DSH .54,11300030000330308.3 

33 DSKDl 

OK 8*5 

OB 3,7,3 

DW DlDSM-l,S4-l,ilEV {11000000 3030003331 

DW (64+3)/4 

OW 3 

;asborne Single deisity, single sided. 

DPBGEN DSKS1,2*10,4,15,1,S1DSH ,64.10300000030030303,3 

Oa DSKSl 

OH 2*10 

03 4,15.1 

DM S1DSM-1,S4-1,REV (10000330300000333) 

DW i 64+3 ) / 4 

DM 3 

OPBSEi^ Xt^ax,l*18,3, 7,0.XX3SM ,3 2,100033303033 33333,3 

OB XEROX 

DW 1*13 

38 3,7,3 

3H XXDS»t-l, 32-1, REV ! 10000030303030333 ! 

DM (32+31/4 

DW 3 



3Pa3EN IBM ,4*3 ,3, 7,0, ISMDSH, 54, 1 1303000333333003, 1 

DB IBM 

DW 4*3 

OB 3,7,3 

DM IS.»»DS'',-l,54-l,«El/ (11000303000000033) 

OW (64+3)/4 

DW 1 



DPBGEN DEC ,4*9 ,3, 7, 0, DECDSM, 5 4. 1100303033 3030303. 2 

33 DEC 

3H 4*9 

DB 3,7,3 

OW DE:DS-I-1,64-1.REi/ (1100030303000D03B) 

DW (64+3)/4 

DW 2 



DS 



16 



0036 



NUHOPB: 



(*-0'S5T4RT)/10H 



o 

o 



o 

o 

3 
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E2FE 



^0>1RI: 



e2Ft 


3A08EF 




E301 


4F 




E302 


E079 


i 


£30*^ 


FOEl 


i 


r306 


3DE1 


s 


£308 


El 




E309 


Dl 




E304 


CI 




E303 


Fl 




E30C 


EDTSSFEF 


s 


E310 


F3 




E311 


C9 





Exits i 


lOM resMen 


LD 


Jt'^OMRAM 


10V 


CtA 


OT,C 


A 


PGP 


lY 


POP 


IX 


POP 


HL 


POP 


DE 


POP 


EC 


POP 


AF 


LD 


S?,IEST< 


EI 




RET 





InterruDt routiTs. 



Sport 

:set AOH or ^Ai anaalid 



!res3t tD interrupt entry st< 
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E31Z 



?O^CDE: 



a 

a 
o 

3 



E312 31 

E313 73 

E314 0603 

E316 5F 

E317 1601 

E319 



Calls ?Q»* resideit processor 

Entry OE = resident processor ta call biased 

by C3IQS jjmp vector. 
MDTE: 'OM Ju up vector nust match :3IjS vector 

Entry at 'lOHCDl with low digit of :bI0S vector it reg E 

POP DE ;Get calling address 

MOV A,E 

SUI 3 

MOV S.A 



R01JMP: 



D,high (^0'<VEC) 



E319 


FDE5 


* 


PUSH 


ly 


E313 


DDES 


i 


PUSH 


IX 


H31D 


F3 




01 




E31E 


D9 


I 


EXX 




E31F 


210000 




LDK 


HL,0 


E322 


39 




ADO 


HLtS? 


E323 


31C1EF 




LDK 


SPt3I0ST< 


E325 


E5 




PUSH 


HL 


E327 


D9 


$ 


EXX 




E328 


C0D7E8 




CALL 


SW2RDM 


E328 


C03AE3 




CALL 


30R0>^ 


E32e 


CDE2E8 




CALL 


SW2RAM 


E331 


FDEl 


i 


POP 


IV 


E333 


F0F9 


i 


MOV 


SP,ir 


E335 


DOEl 


t 


POP 


IX 


E337 


FDEl 


$ 


POP 


lY 



Entry hare to jjTip to RDM function code directli 

Entry OE = ROM jjmp address 

BCj HL. IX = any paranieters 



JSave user Index registers 

;Set up local stacK for RO'I 

;Old stack to HL 

;Save old stack pointer 



;Go to Hm address (>E) and return to next instruction 
SRestore old stack pointer 
;Restore user Index registers 



E339 C9 



RET 



E33A 



GO^OM: 



E33A 


D5 




PUSH 


D£ 


E338 


FDEl 


$ 


PQD 


lY 


E33D 


FDE9 


$ 


JMP 


tlY] 



This routine is jsed to simulate a CALL (DE) instruction 

;RDM JuTio address to lY 
;Go to RTH, R31 4ill RET to next instruction 



S0?CI"1 803x Assembler i/er 
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E33F 



home: 



!?eturns 
to zero 
disk. 



disk to lOTie. This routins sets tie trjik njnoer 
The currant host disk buffer is fjjsied to the 



o 


E33F 


CDCIE6 


3 


E3*2 


AF 




E3*3 


3Z50EF 


1 


E346 


3252EF 


T3 


E3*9 


3219EF 


S 


E34C 


321AEF 


o 


ES'fF 


C9 


Q 







CALL 

XRA 

STO 

STO 

STO 

STO 

RET 



FLUSH 

A 

A.HSTACT 

A.UNACMT 

A.SEKTRK 

A.SEICTflKH 



;Flush hDSt bjffsr 

iCIear hsst acti i/e flag 
;[;te3r sector count 
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E350 



SELOS<: 



E350 




E350 


30E3 


E352 


79 


E353 


FE02 


E355 


02A4E3 


5358 


3213EF 


E35B 


59 


E35C 


2600 


£356 


29 


E35F 


29 


E360 


29 


E361 


29 


E362 


7S 


E353 


1100E2 


E365 


19 


E367 


2206E9 


E364 


5F 


E36B 


CDFftE3 


E36E 


C28CE3 



E371 


110A30 




E374 


19 




E375 


5E 




E376 


23 




E377 


56 




E378 


IB 




E379 


lA 




E37A 


325CE9 




E370 


24CCEF 




E380 


5D7500 


$ 


E383 


D37'V01 


t 


E386 


2A06E9 




E339 


DDEl 


i 


E383 


:9 





ieiecis aisK driife ror next transfer. 

ENTRY C = ais< selection valus t0..15). 

OE aid 1 = 0, first call far this disk. 

EXIT HL = 0, if drive not sel50taDl». 

HL = D?H address if drive is sslacted. 



SSave ussr IK 



PROC 




PUSH 


IX 


MOV 


A,C 


CPI 


NDSK 


JNC 


SELD 


ST3 


A,SE<OSK 


>10V 


L,C 


MVI 


H,0 


ADO 


HL,HL 


«rkrs 


HL,HL 


ADO 


HL.HL 


ADD 


HL.HL 


MOV 


A,E 


LDK 


DE.OPBASE 


ADO 


HL,DE 


STO 


HL.SAVDPH 


HOV 


E.A 


CALL 


CHKSEL 


JNZ 


SELE^ 


LOK 


DE.IO 


400 


HL,D: 


LD 


EtCHL] 


INC 


HL 


LD 


D,tHL3 


DEC 


OE 


LD 


A, IDE] 


STO 


A.SEICTyp 


LD 


HL.SEQ 


STO 


L.CIX+0] 


STO 


H.CIX+13 


LO 


HL»SAVOPH 


POP 


IX 


»ET 





• If invalid driv3 njnber 



:*16 

;get initial bit 

;hL = 0P^ address 



;Restore initial bit 

;Check to see if density needs to be detemined 

S'Jnaole to deterniie densityt error return 

;forii dob addrsss 
;to get tyoe 



;dpb address in DE 

Sget dis< tyoe 
;and store value 

SGet current ssqjeice cojnt 

;Store seq # in LASTA ar LASTS 

JRestore user IX 



o 
o 
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? Select disk srrDr laTdling 

E38C 1103EJ SELE^S LDK DE,F3RER^ 

E38F E601 4NI 1 'Is diskette jnf dp nattad? 

E391 2003 '■;396$ JRNZ SELE^l :Yes 

E393 1132E3 LDK DE.OESES^ iNo» get density error iiessage 

E396 3A1BEF SELE^l: LD A.SEOSK 

=399 Cb41 »DD A, 'A' 

E39B 32D7E3 STO A.D^V ;lndicat3 drive in msssaje 

E39E 32F9E3 STQ A.DRVl 

E3A1 C011E7 CALL PRINT ;Print aapropriate message on console 

E3A4 DDEl » SELO: PDP IX ;Restore user IX 

E3A6 210000 LDK HL.O 

E3A9 3A04DO LOA COIS< 

E3AC 91 SU8 C 



E3A0 CO 



^HZ !If default drive not it error 



E3AE 320*00 STO A«CDIS« 

E3B1 C9 RET 

E3B2 2-5 DEME^R: OB DENL 

E3B3 0D0A*3SliE 08 CR rLFt • Can ' • t recognize diskette dt drivj • 

E3D7 = 0001 ORV: OS 1 

= 0025 DENL: = «-OENERR-l 

E308 21 FORERR: 03 FORL 

E3D9 3D0A555E65 OB CR »L'=» 'Unf or matt ed diskette on drii/e • 

E3F9 = 0001 ORVl: OS 1 

= 0021 FO^L: = s-FORERR-1 
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E3Fi 



:h<sel: 



Detaminss if ns^ 3PS should be ?st?.TtisTBl 

ENTRY C = diSK sslection value 10. .151 

E £ 01 =: 0, first call for this iisK 

EXIT IX = address of drive sequancs njinse- 

l status fait S3t» good retjrn 
I statLiS bit clear* error rsturn 



O 
o 



E3FA 
E3FA 
E3rB 
E3FC 
E*00 
E401 
E402 
E^O^ 
E406 



£5 

:5 

DD2100E9 S 

79 

B7 

2304 *E433t 

DD23 $ 

0D23 $ 



PROC 

0U3H 

PUSH 

LOK 

"IQV 

OR A 

JRZ 

IMC 

INC 



HL 

BC 

!X,L4STA 

A.C 

A 

CHKSFQ 

IX 

IX 



;Sav3 ussr H. 

;Get last :ouht for selectsd drive 

;Current drive td A - reg 

:is this drive A? 

!Yes» crtec>< sequence njiijer 

;No» fdm address for 3 



E403 
E40B 
E40E 
E411 
E413 
E414 



334E00 

304i01 

2ACCEF 

ED42 

CI 

DOES 



s CH<s?g; 

s 

$ 
i 



LO 

LD 

LO 

SBC 

POP 

PUSH 



C.CIX+0] 
B,CIX+1] 

hl,s;q 

HL.3C 

BC 
IX 



;3et last sequence nj-nde- for this drive 

;3et current seoueice hjnber 
;CoiiDare seq *'s 



E416 C3*3 i 
E418 2300 *£427$ 



BIT 



D,E 

!10 



;First cal ! for this dis<? 
;Yes, fill in DPS 



E41A 


7C 




E419 


37 




E41C 


28 OE 


"E42CS 


E41E 


Fe02 




E420 


3005 


»E427$ 


E422 


7D 




E423 


FEAO 




E425 


3835 


•;47C$ 



E427 C031E4 :10: 
E42A 1801 »E42D$ 



MOV 

OR A 

JRZ 

CPl 

JRNC 

HOV 

CPI 

JRC 

CALL 
JR 



A.H 
A 

GPET 
02 

no 

A.L 

OAOH 
GRET 

GO EN 
RETURN 



;Mo» chszK elasoed tine 
JElasced ti.-ne < 4 se: 
iYes» good retun 



;£lasped title > 5 sec 
;No» indicate goad retjrd 



E42C AF 



GRET: 



XRA 



£420 


9DE1 


$ return: 


POP 


IX 


E42F 


El 




POP 


HL 


£430 


C9 




RET 





o 

o 



o 

o 

o 

3 
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E47F ooTeao t 

E4S2 77 

E483 23 

t4B4 uuTtai s 

r437 77 

E468 AF XRA A Undicata gODd retjn 

E489 C9 



Error return ssction 



LD 


A. t:x+o] 


STO 


A,tHL3 


INX 


4L 


LD 


A.tlX+ll 


STD 


A.tHL] 


XRA 


A 


RET 





-• E48A 3E01 SELOl: 1VI A.l ;indicat3 jnformatted di 3K Z-fiag = clear, & = 1 

o E4BC C9 RET 

"3 

3 E48D F532 SELD2: QRI 02 ;indicat3 jnr e:ogni zibi e disk Z-flig = clear, A = 2 

§ E48F C9 RET 



o 

o 



o 

o 

3 



O 
o 
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:490 



3ETDEN: 



Gets density of selected disk 
ENT^r SEiCDS< = Current drive 
EXIT C = TYPE ^ 



Undef = D <■ 

Bytes/seitor <- 

Sides < 

Density < 



3 = » of D>iysica1 sectors oer trac< 
A = 3« good return 
A <> 0. arror return 
Z-bit set. good return 
Z-bit claar. error retun 





= 0130 


SEMDEN: 


= 


130H 


E*90 
E*90 
E*93 
E496 
E499 


3A17EF 
3208E9 
3AD0EF 
3239E9 




PROC 

LD 

STD 

LO 

STO 


A.SDISK 
A.TEMOSK 
A.SAVTYP 
A,TEMTYP 


£490 
E49F 


3A18EF 
3217EF 




LO 
STO 


A,SE<OSK 
A.SOISK 


E*A2 
E^AS 


113001 
CD19E3 




LDK 
CALL 


DE, SENDEE) 
ROHJ-^P 


54A8 
E4AB 


3A08E9 
3217EF 




LD 
STO 


A.TEMDSK 
A.SDIS< 


EtAE 
E4B1 


3AD0EF 
4F 




LD 


A.SA\/TY? 
C.A 


E4B2 
£435 


3A09E9 
32D0EF 




LO 
STO 


A.TEHTYP 
A,SAVTYP 


E4B8 


CO 




RNZ 


ERRET 


E4B9 
E4BA 


AF 
C9 




XRA 
RET 


A 



SSave current i/aiue 

•,of SDIS< 

;and SAVTYP 

MSOISK t SAVTYP are usad by SENDEN) 

• Oi sW to 09 33 leat 

;in SOIS< (parametar to SEMDEN) 

;Cal I SEMDEN 

:Re3tore caller's valua of SOJSK 



;Exit TY'E oaranater 
;into C - Reg 

SRestore caller's SAVTYP 



;Error rstjrn. flag set oy SENDEN 
;Indicata good retjrn 
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;4sa 



SETTRK: 



o 

o 



E*3a 


ED^SigEF 


E4Br 


2A53EF 


E4C2 


7D 


t4C3 


&9 


E4C4 


<fF 


E*C5 


7C 


E4-C6 


&S 


E4C7 


Bl 


E4C3 


C8 



jSi.3 i.r3;k iijiijsf. The track njnaer is saved fo^ 
use juring a dis< transfer ooeratian. 

ENTRy BC = traDk njirber- 

» Set trac^ 



later 



STO 


BC,SEKTi?< 


LHLD 


JN4T^< 


MGV 


A,L 


XRA 


r 


HOV 


C.A 


HOV 


A.H 


XRA 


3 


DRA 


C 


RZ 




JMP 


:una:t 



;if sane tra:k 



E4C9 



E4C9 AF 
E4CA 3252EF 
E4C0 C9 



CUNACT: 



Clear Una I looated block count (forse pre-reads). 



XRA 
STO 
RET 



;a = 



A.UNACNT 



JCIear uTallooated block count 



E4CE 



E4CE 79 
E4CF 3220EF 
E4D2 C9 



SETSEC: 



Set the seotar far later use in the disk transfer. »lo 
actual disk operations are perfoned. 



Entry 8C = sector number. 

HOV A,C 

STO A,TEM3EC ;sactor to s==< 
RET 



E403 



SETD^A: 



E403 E04311EF $ 
E4D7 :;9 



Sets Disk Tiefiory address for subsequent disk read or 
write routines. This address is saved in DMAADR until 
the disk transfer is oerformed. 



ENTRY 
EXIT 



STO 
RET 



BC = Dis< ]«eraory address. 

OHAAOR = S:. 

SCDMAADR 



o 

o 
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E4D8 



O 


E4D8 


3A55EF 


o 

3 

T3 


E4DB 


39 


E4DC 


C4C9E4 


1 


E4DF 


79 


a 


E4E0 


3255EF 


o 


E4E3 


69 


1 


E4E4 


60 


a 


E4E5 


78 


3 


E4E5 


32 




E4E7 


C8 




E4E8 


19 




E4E9 


6E 




E4EA 


2600 




E4EC 


C9 



5E:T?N: 



TR&N: 



Translates sector njmber froi-n l03i::al to pTysi 

ENTRY DE = 0. 10 translation reauired. 
DE = traislatton table address. 
BC = sector number to translate. 



:al. 



EXIT 



HL 



translated sector. 



LD& 


UNASEC 


CMP 


C 


CNZ 


CLiNACT 


MOV 


A,C 


STO 


A.LOGSEC 


MOV 


L.C 


MOV 


H.B 


MOV 


A,E 


OR A 





R2 




ADD 


HL.DE 


MOV 


L.H 


MVl 


HtO 


RET 





;lf sectors do not -natch 



JCheck if translatioT is required 
;None required? return 
:Translation required 



S0?CI>1 8D8x issemoler mbt 
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o 

o 

3 



E4tD 

E*EO 3100:3 



E*FO 



:DE2E8 



3 o t 



C ? / 1 



from 



n i 



C33C!T: 



E4F3 3A66rl 

E4F6 3203D0 

E4F9 3A69E1 

E'^FC *F 

E4F0 :D3CE1 

E500 3A5SE1 

E503 326CEF 

E505 3A39E1 

E509 32DaEF 

E50C 4F 

E50D 320*30 

E510 3C 

E511 180E *E521$ 

E513 

E513 3130CB 

E515 C03FE3 

E519 110331 

E51C C019E3 

E51F 3E02 

E521 



pOaOT: 



3CPM: 



bc:p: 



£521 F5 
E522 318000 



ine Cajui sntry joint gets contral fron ths oo I i start 
loader and is rsspDnsible for ths Dasic systsii iiitial- 
izatlon. This iTcludes outputtiTg a sigi-Dn Tiessaje an'i 
initializing the following page zero Iscatiois: 

0»lt2: Set to tie wamstart jjno i/astar. 

3: Set to tne initial IDSYTE value. 

4: Default and logged on drivs. 

5,5t7: Set to a jumo to 33DS. 

The V320T entry aoint gets control wtsi a warm start 
occjrsf a *C fron the console, a jjno to 330S (fjnotiOT 
3)» or a juiio to location zero. The rf3Q3T routiTs reads 
the CCP and S03S from the appropriate disk sectors. 
i*B33T nust also re-initialize looations 3.1.2 and 5,6,7. 
The /JBOar rojtines exits witT ths ; register set to the 
appropriate drivs selection lvalue. T-ts exit add-ess 
is to the CCP rojtine. 



LOK 


SP.CCo 


CALL 


SW2RAM 


LD 
ST3 


A,I05ITc 
A.I03YTF 


LD 

MOV 

CALL 


A.BRATE 

C.A 

S3AU3 


LOA 
STA 


SCSSZE 
LLINIT 


LD 
STO 


A.IEEEAD 
A.IEAOR 


XRA 
STD 

INC 


A 

A,CDIS< 

A 



JR 



3CCP 



LDK 


SP.CCP 


CALL 


HOME 


LDK 


DE.R3«VE:+3*1 


CALL 


ROMJMP 



«VI 



A, 2 



Sget iot)/te ^alue 

•Set I/Q byte to default 



;set baud rate 



Sset screen si ze 

5Get IEE; devioe address 
Tand save it in 3>1RA>« 



SSet current drive tD 4 

;do cp/m 

;W3rT) boot 

;f lush any bjff er 

;3et ROM vector address 

• indicats /<ar7i boot 



JEntry A = 01, if cold boot 
A = 02. if warn boot 



PUSH 4F 

LDiC 3C,D3UF 



SSave entry 

:Set default data transfer address 
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DsBorn^ CP/H 2.2 C3nS Rav 1.4 CsOCCSI 055. 4SH 

o 
o 

5 E525 CDD3e* CALL SETD^A 

S E528 2130EA LDK HL.HST3UF 

- E52S 220FEF 5TC HL.O'^ADR ;sst ' Q** 0M& address 

@ 

g : Clear c3TSol2 control ESC cs I ! 

Q E52E AF XRA A 

« E52F 32&0EF STO A, ESCH Jclear ESC 

o 

! Set-jp low core DOinter calls 

O E532 3EC3 LDK A.0C3h ;Store ju-nps in lo^ neiiory 

o 
3 



a 



E53* 320030 STO A,0 

E537 3205DD STO A, 5 



S E53A 2103E1 LDK HLt3I0S+3 

O E53D 220100 STO HL,1 

S £5*0 2106D3 LDK HL.a^aS 

g E543 22D630 STO HLt6 

§ E546 2190;1 LOK HLtCAUTO 

E549 CI P3P BC :coM/war3:i Mdicatar in 3 

E54A 3A9CE1 LD AtAC«D 

E54D AO AND B 

ESiVE 28*A »E59Ai JRZ CONE 

E550 7E LO A.tHLl 

E551 f»7 ORA A 

E552 2B'^6 "ES^AS JRZ DONE 

E554 1107:3 LDK DE.CCPt7 

£557 0600 LDK 3,0 

E559 4F M3V C.A 

E55A EDBO S LOI^ is'ova canirund I i i= ta Djffsr 

E55C 110000 LDK DE»0 

E55F 18*7 *E5A8i JR OCNEl 

E5S1 38 S1SN3N: D8 SIGNL ;LeT3th of 3i^^on -nessass 

E562 lA DB 'Z'-^On 

E563 4F73526F72 DB •Osborne Computer Systei)' 

E57A ODOA DB CR,LF 

E57C 3539 DB MS I IS/ ID*-' 0' .HSI ZE irod 13 * '0' 

E57E 632043502? 08 • k C'/l i^ers • » VERS/ 10+'3' , • . ■ ,VERS nod 13 + ' 0' 

E580 000A*3t2<f9 DB CR,LF.'C3iaS 1.4',CR,LF 

= 3038 SISNL: = *-SIGN3N-l 

E59A 3c02 DDME.: LOK A, 2 

E59C 38 CMP B 

E590 2806 "ESASt JRZ D0NE3 

E59F 1151E5 LDK DE.SI5N0M 

E5A2 CD11E7 CALL PRINT 

E5A5 U0330 DONEO: LOK DE,3 

E5AB 2100CB DOMEl: LDK HL.CCP 

E5AS 19 ADD HL.OE 

E5AC 340400 LO AtCOISK 

E5AF *F MOV C.A 

E5B0 E9 JMP tHLl 



o 

o 



Ssborna 



E581 



SO^CIM 8Q3x Assemblsr xer 
;P/M 2.2 CSinS Rav 1.4 



3.55 <:/35n = 



^EAD: 



= 9:92 Page 23 
C:DCC3i:65.4S>« 



a CP/1 128 byta sector. 

EXIT 4 = o« sjccsssful read oaeratiDn. 

t = 1» uTSjcessfjl read op?ration« 

Z bit = 1. successful read oseratian. 

2 sit = 3. UTSjccessf u I read oae-ation. 



O 
o 

3 

T3 



O 
O 



E5S1 




E5B1 


CD05E7 


E5B4 


4F 


E535 


3252EF 


E5B3 


C044E6 


E53B 


El 


Esac 


01 


tSBO 


aiBooo 


E5C0 


EOBO 


E5C2 


3A22EF 


E5C5 


B7 


E5C6 


C8 


E5C7 


AF 


E5C8 


3250EF 


E5C6 


F601 


E5CD 


:9 



PRGC 




CALL 


HVIMFO 


XRA 


A 


STD 


A.UNACNT 


CALL 


FILL 


POP 


HL 


POP 


DE 


LOK 


BC,128 


LOIR 




LD 


A.ERFLAG 


ORA 


A 


?Z 




XRA 


4 


STD 


AtHSTACT 


ORl 


1 


RET 





Jffove informatioT for transfer 
!Set flag to force a read 

JCIear sector cojnter 
;Fi I I bjff 2r yjitn data 



;»4ove 12B bytes 



!If no errar 



JCIear host active <4 = >) 
;lndicate error 



o 

o 



SOlCIM POSx issembler ^^^ 
Dsborne C^/M Z.Z C9ins Rev l** 



3.55 <:/55/7= 



= 9:52 °ii3 f^ 
C:0CCBI3S5.4SM 



E5CE 



*(i?lTt: 



the selected 128 byte CP/M sactar. 

ENTRY C = Of write to a prsviajsly allacatad blo:K. 

C = It write to the direotar/. 

C = 2. writa to the first se:tor of unallocated 
data blook. 

cxiT i = 5, write was successful. 
4 = It write was unsucessfji. 
I bit = It write was suc:3ssfjl. 
I bit = 3t write was unsjcessfji. 



E5Ct 




E5CE 


C3DSE7 


E501 


79 


E5D2 


3223EF 


E5D5 


FE02 


E507 


201A »E5F3S 


E509 


3A5CE9 


E5DC 


FE35 


E5DE 


3E10 


E5E0 


2802 ''E5E4i 


E5E2 


3E03 


E5E4 


3252EF 


E5E7 


2A19EF 


E5EA 


2253EF 


E5FD 


3A56EF 


E5F0 


3C 


E5F1 


1328 »E61ES 


E5F3 


2152EF 


E5F5 


7E 


E5F7 


37 


E5 = 8 


:A23E6 


E5P6 


35 


E5FC 


21F4E1 


E5FF 


11103Q 


E602 


3A13EF 


E605 


^7 


E606 


04 


E607 


19 


E603 


lOFD '■E6D7t 


E60A 


5E 


E533 


23 


E6i(; 


56 


E600 


lA 


E60E 


47 


E60F 


3A55-F 


E612 


3C 


E613 


^3 


E61* 


2003 "■E51ES 


E616 


2A53EF 


E619 


23 


E61A 


2253EF 



WRITl: 



li^l'Z: 



W^1T25: 



psnt 




CALL 


MVINFO 


"OV 


AtC 


ST3 


AtHRTYPE 


LPI 


WRUAL 


J^\I 


WRIT2 


LO 


A,S£<TYP 


CPl 


5 


LDK 


At2043a28 


JHZ 


iJRITl 


L3K 


Atl024/123 


STD 


AtJNACNT 


LD 


HLtSEKTR< 


ST3 


HLtU\ATR< 


LO 


AtLJSSEC 


INC 


A 


JR 


WRIT3 


LDK 


HLtUNACNT 


LO 


Atthll 


OR A 


A 


JZ 


HRIT4 


DEC 


Can 


LDK 


^LtDPBSSE- 


LDK 


DE,16 


LD 


AtSEOSK 


MOV 


BtA 


IMC 


3 


ADD 


HLfOE 


djn; 


MR IT 25 


LC 


EtCHLI 


INC 


HL 


LD 


OtCHLJ 


LO 


AtCOEl 


MQV 


5ti 


LO 


AtUNASEC 


INC 


A 


CMP 


3 


JRHl 


WiiIT3 


LO 


HLtUMATR< 


INC 


HL 


STD 


HL.USATR< 



Move iTf orniti OT for tmsfsr 
[Write tyoe in c 



;l f wr i ts t3 all ocated 
;Check for 2< bl oc< si fa 



;Type = risDorne single dsnsity t2K oloak sizsl 
;atherwi 39 1< bl 3C< si ze 



; JNATSK 



SE<T^K 



!If TO uiallocatsd records 
;d3C unalloc record count 



^L.D?3SSE-16tlO :Get nj-noe" of sectors oer track 



;to point to next OP'S 



;Nij-^ber of sectors per track in A reg 
;lncreiient logical sector 

;if not end of track 



3sborri3 



SO?Ci« 303x Assembler jer 
:p/H 2.2 C3I3S ^3v 1.* 



<:/55/7= =9;9? Page 25 
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O 
o 

3 



E61D 


AF 


E516 


32555C 


= 521 


3e^' 


5623 


:04475 


E626 


Dl 


E627 


El 


E62B 


0190D0 


E62S 


ED30 


E62D 


3E01 


E62r 


3251EF 


£632 


3A22EF 


E635 


B7 


= 536 


CO 


E637 


3A23EF 


E634 


= c01 


E63C 


CCC1E5 


E&3r 


3ft22EF 


E64Z 


37 


E643 


:9 



j(RIT3: 



dRlJi,: 



STD 


A.U-gASE' 


L'DK 


A* jFFh 


CALL 


FILL 


POP 


Dt 


POP 


HL 


LDK 


3C.123 


LOIR 




LDK 


1.1 


STO 


A.HSTWRT 


LD 


a,e=;flag 


OR A 


A 


^NZ 




10 


A.i^^TYPF 


:pi 


WRDIR 


cz 


FLUSH 


LD 


a.ERFLqG 


OR A 


A 


RET 





;HS''wf(T 



ilf any arrors o^cjrrad 

iwrite t/33 

;to directar/? 

;Force write of di-9;t3r/ 



9 

■q 



SOSCIH 309x 4ssemblar i/er 3.5? <:.'55/7= =9:92 Paja 25 



3s3orn9 ;?/« 2.2 CilDS Rev 1.4 



E64* 



fill: 



-ills 

ENT'?Y 

EXIT 



C:0CC?I3S5.4S« 



host bjffer «ith aooroprita hc5t sactor. 

S = D. ^sai required if not in bjffer. 
Otherwise read not required. 

On exit the stack will cantain the fjllOiJiTg 

val ues: 
PQP X ix - host record address. 
POP y «y = caller's tiuffar address. 



E5** 




E644 


3221EF 


E647 


?*5CE9 


?44ft 


OF 


E6*B 


3F 


564C 


E603 


£6'tE 


1,7 


E64F 


118DEA 


E65Z 


3413E= 


E655 


21B3DC 


E653 


2303 "56655 


E65A 


E3 


E65B 


OF 


F65C 


30D1 »E65F$ 


E65E 


19 


E65F 


E3 


E660 


29 


E661 


E57F 


E663 


10F5 ''E65A* 


E665 


3218EF 


E669 


2A11EF 


5663 


E3 


E65C 


05 


E660 


E5 


E66E 


7150EF 


E671 


7E 


E672 


3601 


E674 


37 


= 675 


2810 ''E694S 


E677 


Z15DE9 


E674 


3A5CE9 


E67D 


3E 


667E 


2011 •E691t 


E630 


211CEF 


E6S3 


1113EF 


E686 


0604 


E683 


lA 


E689 


3E 


E6BA 


2005 -^ES?!* 


E68C 


23 


E63D 


13 


E68£ 


10^3 »E633$ 



= ILL2: 



FILL3: 



FILL35: 



FILL*: 



pr oc 

STO 

LD 

RRC 

RRC 

ANI 

MOV 

LOK 

LO 

LOK, 

JRZ 

EX 
SRC 
J^NC 
ADD 

EX 

ACD 
AMI 
DJNZ 

STD 

LO 

XTHL 

'USH 

PJSH 

LOK 

LO 

STO 

3RA 

JRZ 

LDK 

LD 

CMP 

JRNZ 

LDK 

LOK 

LDK 

LD 

ZAP 

JRNZ 

INC 

INC 

DJNZ 



At^OELAG 
A,SE<TYP 



03 

B.A 

DE.H5TSUE 

A,SE<SEC 

HLtl23 

F1LL33 

OE.HL 

FILL3 
HL.DE 

OE,HL 
HL.HL 
07Fh 
FILL2 

A.SE<SEC 
HL,0«AAO^ 

DE 



HL.HSTiCT 

A, [HL] 

l.tHLl 

A 

FILL6 

HL.HSTTY' 

A.SEKTYP 

tHLl 

FILLS 

hl.hstse: 
de.sekse: 
b.seosk-seksfc*! 



;Sa«a read flag 



; ini t iai offset 

;Get logical sector 

;128 byte records 

:ju'np whaT sector size <> 128i no deblDC<ing necessary 



! I f I 0(( bit TOt set 
;Add bias to offset 



•MasK seotar 

;SEK5tC = ohysical sector - 1 

;Set return saraneters 

;5et return address 

;host act i 1/9 flag 

lalways aecones 1 

;lf host ojffer inactive 



A. [DEI 

[HLl 

FILLS 

HL 

DE 

FILL4 



;I f ni s-natcn 

;lf all oytes not enacted 



jSDorne 



:690 



SORCI>« 803x Assembler >^sr 
;P/M 2.2 C8I3S R9V 1.4 



3.5E 



<:/55/7= =9:92 Pags 27 
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O 



O 
o 



: 'j- i 


LJL1Z& FILLS: CALL 


FLUSH 


t694 


3A1BEF fills: LO 


A.SEOSK 


5597 


321FEF 


5T0 


A.HSTDSK 


E69A 


3217EF 


STO 


AtACTDSK 


E69D 


2A19EF 


LD 


HL.SEKTR< 


E6A0 


22iaEF 


STQ 


NL,HSTTR< 


E6A3 


2215EF 


STO 


hl,a:ttr< 


E6A6 


3A15tF 


LO 


A,SF<SEC 


E6A9 


321CEF 


STD 


A,^ST$EC 


E6AC 


3214EF 


STQ 


A,ACTSEC 


E6AF 


3A5CE9 


LD 


A,Se<TVP 


E6B2 


3253E9 


STO 


A.HSTTV 


E6B5 


32D0EF 


STO 


A.ACTTV? 


E63a 


3A21EF 


LD 


A.^DFLAS 


E&38 


57 


ORA 


A 


:53C 


CO 


^NZ 




E6BD 


3E03 


LOK 


AtO 


E68F 


1822 "E6E3t 


JR 


FIMAL 



;FlLish hDSt D'jffsr 
JHovs di sK 



;if no rsad requirad 

;Reacl 



SOICIH 30ax lss9inbl?r xer 
Dsborne :p/« 2.2 CBIDS ^9V 1.4 



3.5E 



<:/55/7= 



= 9:<!2 Page 25 
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E6CI 



flush: 



ilrites out active fiost bjffer onto disk. 



o 
o 

3 



o 
o 



E6C1 




-6C1 


2151EF 


E6C* 


7E 


£605 


■57 


E6C5 


:8 


E6C7 


3600 


E6C9 


3A1FEF 


E6CC 


3217EF 


E6CF 


2A13EF 


E6D2 


2215EF 


E6D5 


3A1CEF 


E6D3 


321«.EF 


E603 


3A5DE9 


E60E 


3200EF 


E6E1 


3E03 



pr oc 




LOK 


-iL.HSTft'RT 


LD 


A. [Til 


3RA 


A 


^2 




STO 


O.thll 


LD 


A.HSTDSK 


STO 


A.ACTDSK 


LD 


riL,HSTTR< 


STO 


HL,ACTTR< 


LD 


A.HSTSEC 


STO 


A.ACTStC 


LO 


A.HSTTV? 


$72 


A.ACTTrP 


L0«: 


A. 3 


J*(P 


FINAL 



:lf host bjffer alrea:ly an iisK 
;'^ovB Ci sK 



! W r i t e f 1 a 3 



SOSCIH 808x issembler ver 
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E5E3 



final: 



Preforms final transfer nrnra^^inr 



EMTRY 



A = .. read disk. 
= 3 .. write di sk. 
Calls: Ram resident routine to raad/^rite DNE 
sector OTiy. 



o 

o 

3 

T3 



O 
O 



E6E3 


5F 


E6E4 


1600 


E6E6 


212701 


E6E9 


19 


E6EA 


220AE9 


E6ED 


2114EF 


E6F0 


3* 


E6F1 


2A04E5 


E6F4 


E8 


E6F5 


3501 


E6F7 


C019E3 


E6FA 


3222FF 


E6r0 


:8 


E5FE 


2122EF 


E701 


76 


E702 


F601 


E704 


77 


E705 


t:9 



MOV 


E,A 


LOK 


D.O 


LDK 


HL,R0HVE:+3*13 


ADO 


M,OE 


STO 


HLiSAVAD? 


LDK 


hl»a:tse: 


INC 


thl] 


LD 


hl.savao^ 


EX 


OEtHL 


LDK 


B,l 


CALL 


ROMJ'^P 


STO 


A.ERFLAG 


HI 




LDK 


HL.E^FLAS 


LD 


AttHLl 


3RI 


Olh 


STD 


A.tHL] ;SBt er 


RET 





Supdate se;t3r+l 



;indicat3 ana seitDr xfer 

Jprocess read or write 

Sset possiDle error flag 
! I f no error 3 



SO'ICIM 808X Assembler ver 3.5E <:/55^7= =9:92 Pa33 33 
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E706 MVINFO: 

; Mowe information necessary for transfer. 

;Clear err jr f I as 





E706 


4F 


lO 


E707 


3222EF 


» 


E70A 


3A23EF 


o 


E700 


3218EF 


i 


E710 


:9 


o 






"O 

c 

• 






o 

o 







XRft 


A 


STD 


AtERFLAG 


LD 


A,TE>^SEC 


STO 


A.SEKSEC 


RET 





o 

o 
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=711 PRINT: 



ETll 2138E7 
E714 1803 »?719$ 



Print Tiessags string to CINSOLE riewiae 



LOK 



HLtCa^SDUT 
STRDJT 



O 



O 
o 



E716 



E716 213FE7 



PSTR: 



Print messaga string to LIST devics 



LOK 
JR 



HL.LIST 

STROJT 



E719 



STRCUT: 



Print Tiessase terminatad by zaro ftyta. 

ENTRY DE -> Tiessage buffer? first byte 

EXIT DE -> D£ + length 

4 = 0. 
Z bit set. 

JSES A, BCf DE, ^L 



1 snjt T 



E719 






PR DC 




5719 


lA 




LO 


A.tDEI 


E71A 


B7 




DRA 


A 


E718 


CB 




RZ 




E71C 


47 




MOV 


B,A 


E71D 


13 


mext:: 


INC 


DE 


E71E 


lA 




LO 


AtCDEl 


E71F 


4F 




HOV 


C.A 


E720 


35 




PUSH 


DE 


E721 


C5 




PUSH 


BC 


E722 


E5 




PUSH 


HL 


E723 


1128E7 




LDK 


OE.MEXT 


E725 


D5 




PUSH 


DE 


E727 


E9 




J?*? 


CHL3 


E728 


El 


SEXT: 


POP 


HL 


E729 


CI 




POP 


BC 


E72A 


Dl 




POP 


DE 


E723 


10F3 "E71DS 




DJNZ 


NEXTC 


E72D 


:9 




^ET 





;Get a langtn of orint string 
;if zero tTsn teminata 
JLength to 3 rag 
;Get charaitar 



SSave print string addrsss 

;Save loDD countar 

;Sav3 outDJt routine address 



;Return addrass to stask 
SOutput 



;Print nsxt iharacter if not dona 



o 

o 
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; The following routines will use the I03YTE to traTsfer 
? coitrol to the appropriate device driver 



E72E 



CONST: 



■Returns console status 



o 
o 

B 

13 



E72c 

E72E 217957 

E731 1308 *£733$ 



pr oc 

LD< HL.PT^.CSTiT 

jR godispEh 



55ta tus taol e 

;C3ll aoorooriate rtn 



E733 CO'JI'M: 



E733 

E733 2131E7 

E736 1803 •E73Bt 



^eads inout oharacter from device 

;Table of inout rtns 



or 00 

LDK 

JR 



HL.PTR.CINP 
GODISPCH 



E73a 



CONOJT: 



Puts output character to devica 
C coTtaihs ojtout character 



E738 

E738 2139E7 



pr oc 

UDK HL.PT^_C3UT 



■-Table of outojt rtns 



E73B 

E733 3601 



GDDISPCH: 



E730 1829 »E763S 



LDK 
JR 



0,1 
DlSPCi 



"nuTiber of shifts required to align 
;CjNi50LE field 



o 

o 

3 
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E73F 



LIST: 



£73F 




proc 




E73F 


213AE1 


LD< 


HL.PINTF3 


£742 


7E 


LO 


A.CHL5 


E7'f3 


B7 


3RA 


A 


E^l^'^ 


2003 »E7^Et 


JRNJ 


LISTl 


r7*5 


35 


DEC 


CHLl 


;7<f7 


C5 


PUSH 


BC 


?7'f8 


23 


INC 


HL 


= 7<^9 


EB 


EX 


^LtOE 


E7<»A 


CD16E7 


CALL 


PSTR 


E74D 


CI 


POP 


3C 


i7*E 


3634 LISTl: 


LOK 


3,4 


E750 


2199E7 


LDK 


HL.PT^.LIST 


E753 


1813 »E7b3$ 


JR 


DISPCH 



List device character output 

SGet printer i ni t i si i ati 3n flag 

!»riTtar cre/iausly initialized 

;Non-Z9r3 value to PINTF3 
;Save character 

;Get ini t i il i Zit i OT string 
Sand print it 
SRestore character 

Stable of list routines 



E755 



punch: 



OutDJt to ounch 



E755 




proc 




E755 


0606 


LOK 


B,6 


E757 


2189E7 


LDK 


hl,ptr_p»jc:h 


E75A 


180C *E75e$ 


JR 


DISPCH 



;Punoh r out i nas 



E75C 



reader: 



Reader input 



E75C 

E75C 0608 

E75E 2151E7 

E761 1805 "ETiSt 



proc 

LOK B.8 

LOK HL,PTR_R3R 

JR DISPCH 



reader rautines 



E763 



LISTST: 



Return the ready status for the list device. 

EXIT A = D (zerD), list device is not ready ta 
acc33t another character. 

A - FFh (255)» list device is ready to accept 
a character. 



E763 

E763 0604 



=765 2191E7 



proc 

LDK 



LOK 
JR 



6.4 



HL.'TR.LST 
OISPCH 



Jnumber of left shifts tnrj carry 
5to align LIST field of I33YTE 
ilist statjs routines 
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E768 



disp:h: 



on sntry hera rej B contains t^e l;ft shift count 
required to align tha iobyts field tc bit 1 jositisn. 
and reg HL contains addrass of sslsct taols 



y 


E758 




proc 




? 

3 


E7S8 


3A0330 


LD 


AtlOSYTE 


O 

O 


E76S 




3SPCH1S 




o 

3 

■D 
C 
O 


E753 


17 


!?AL 




E76C 


lOFD »E763$ 


DJNZ 


OSPCHl 


E7&E 


E506 


ANI 


b 


o 


E770 


5F 


yi3v 


E,A 


§ 


E771 


1630 


LDK 


D,0 


■D 

o 


E773 


19 


DAD 


OE 


3 


E774 


5E 


MOV 


EtCHL] 


o 


E775 


23 


INC 


HL 


3 


E776 


56 


MDV 


H.CHll 




E777 


68 


MOV 


L.E 




E778 


E9 


JKP 


[HLl 



; get sel sot f i el d*? 
;de = i obyts field s 



:get the routine address 
:into hi and xchange witn pc 



o 

o 



SO^CIM 803x Assenbler v(er 3.5E <:/55('7 = 
2sborne ZP/» 2.2 C?IDS Rev 1.* 
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O 
o 

3 
■a 



= 779 




?T?. 


.:stat: 




E779 


41E7 






DW 


C^ST 


E778 


69E3 






ow 


SI5TAT 


E77D 


CBES 






DW 


PIST4T 


E77F 


37E8 






5W 


IEINST4T 


E781 




?T^ 


.53? 


. 




E781 




PTS. 


.CIMP: 




E781 


4FE7 






DW 


KEYI'JP 


57S3 


72E8 






DW 


SPIN? 


E785 


CFE3 






DW 


PARIN? 


E737 


3FE8 






DW 


lEINP 


E789 




?T?. 


.PNC 


H: 




E789 




PT?. 


!:auT: 




E789 


*CES 






DM 


CRTOUT 


E78a 


76E8 






DW 


spauT 


E780 


[>3ES 






DW 


P&flOUT 


E78F 


C3E3 






DW 


lEDUT 


E791 




PTR. 


.LSI 






E791 


49F9 






DW 


CRSTAT 


E793 


S5EB 






DW 


S3STAT 


E795 


C7E3 






DW 


P0ST4T 


E797 


SUES 






DM 


lEQSTAT 


E799 




PT?. 


.LIST: 




E799 


*CE8 






DH 


CUTOUT 


E79B 


7AE8 






DW 


PRTCUT 


E790 


D3E3 






OH 


PAROJT 


E79F 


CSES 






DW 


lECUT 



keyboard status 

serial port inDut statjs 

pa rails! input status 

status of iTDut Je(?ic9 on IEEE oort 



get input from kjyboard 
ser i al oor t input 
para 1 1 3l input 
ieee oprt Input 



output character to prt 
serial port output 
paral I el output 
ieee pprt output 



serial output status 
oarallsl output status 
ieee output status 



o 
o 



o 
o 



o 

o 

3 



O 

o 
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E7A1 



;nst: 



E7A1 




E7A1 


3AC1E7 


F7A4 


37 


E7A5 


2005 » 



N S L 



STATUS 



This routine samolas the Cansote status and ratjrns ths 
following valu=s in the A registsr. 

EXIT A = 3 (zarolt means no character 
ourrsntly ready to reaO. 

4 = Frh t255!t means character 
currently ready to read. 

check if any translated keys are cending 



E74C$ 



pr oc 
LD 
DRA 
JRNI 



A. COUNT 

A 

CSST5 



E7&7 


345EEF 


E7AA 


37 


E74B 


C8 


E7AC 




E7 4C 


F5Fr 


E74E 


C9 



:N5T5: 



if no xiated ■(ays 3ending» cnec^ oynit flag 

;Get Key nit flag 
: I f data not ai/a I I abl e 



L3 


A.LKEY 


3'.i 


A 


5Z 




DRI 


OFFh 


>ET 





o 

o 



O 
o 
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E74F 



KEYINP; 



Translates the codes 89h to 3fh as p^r table. 





= 3080 




= 7«F 






E7AF 


ODES 


$ 


E781 


CDF6ET 




E7B'f 


21C1E7 




E7B7 


7E 




E738 


B7 




E789 


2808 »E7C6$ 


E73B 


DD2A5t59 


$ 


E73F 


3D7E0D 
= E7C1 


% 



3ASVL3: = 



KIMO: 



E7C2 34 



E7C3 


DDEl 


E7C5 


C9 


E7C6 




E7C6 


ltD9 


E7C8 


C017E3 



S <RET: 



<IM:3: 



EXIT 


A = t r a n 


= 


aOh 


proc 




PUSH 


IX 


CALL 


AHSC5L 


LD< 


4L.C0'JNT 


LD 


A.[HL] 


DRA 


A 


JRZ 


KIN13 


LO 


IX.XLTKEY 


LD 


A,[IX+03 


= 


*-l 


\>il 


[HL] 


PDP 


IX 



translated code in AS:iI 

!l3rf33t 7alu3 of translatable keys 
; Sa^a ussr IX 



!3et njmber 3f xlated <eys 



LDK 


E,09 


CALL 


ROMCDl 



;if keys pending tnen 

;get bass address in IX reg 



;s i mj I at e LD 

i *■ r, not- -.a»^+- 



s,(i i(+:oj*iT) 

row r r- n-r, ¥ r^ -^ \ r 



; I HDr ainent lount 
i^estore user IX 



When cansole has returned this cade i< i I I cnecK 
for function Kay and preform some translation 



E7CB 


FE33 




CPI 


80h 


E7CD 


33F4 "•57C3S 


JRC 


KRET 


E7CF 


FE3E 




CPI 


8Eh 


E7D1 


30F0 *E7C3S 


JRNC 


KRET 


E703 


C327 


S 


SLA 


A 


E7D5 


5F 




HGV 


E,A 


E7D6 


1630 




LDK 


D»0 


E7D3 


0D2153E1 




LDK 


IX.XLTBL 


e7DC 


3019 




ADD 


IX, OE 


E70E 


ODSEDO 




LD 


L»tIX+0] 


E7E1 


0DS601 




LD 


H,tIX+l] 


E7E4 


0D5E02 




LD 


E,i:iX+2] 


E7E7 


305503 




LD 


D.tIX+33 


E7EA 


ED535EE9 




STO 


OE.XLTKEr 


E7EE 


ED52 




SBC 


HL.OE 


E7F0 


7D 




MOV 


A,L 


E7F1 


32C1E7 




STO 


AtCOUNT 


E7F4 


18B3 "ETBli 


JR 


KINO 



;funotion keys have yalje 

;80h-Sdh 

;do a shift to make pointer 

Sinto table and retjrn if not function kay 



o 

o 



3 
■o 
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E7F6 



E7F6 




E7F6 


3A63E1 


E7Fq 


37 


r7?A 


:8 


E7F8 


2&5&EF 


E7FS 


29 



4HSC^L: 



ahscrl - doas auto horizontal scroll if reauirsd. 



proc 
LD 

QR 



LD 

ADD 



At 


AHSEM3 


A 




NL 


.CURS 


Ht 


.HL 



:get cursor 



check for cursor in hone window 



E7FF 


3ES4 


E801 


BO 


E802 


3309 'ESODt 


E304 


3A61EF 


E307 


06EA 


E309 


:3 


EBOA 


AF 


E80a 


1818 "ESZSS 



LDK 


A, 100 


:hp 


L 


JRC 


RHC 


LD 


A.PI44D 


sua 


VFLa 


^z 




XRA 


4 


JR 


s:rl 



;jumD if cjrsor not in loms window 
;ohecK for screen at horaa 

Sscreen at hone 
•homa scresn 



EBOO 



E8 3D 


3AS1EF 


E310 


-^ftEA 


E812 


:5&4 


E814 


3D 


E315 


DA22ES 



rh: 



check right-'iand inargin 



LD 


A.PIAAD 


SU3 


tfFL3 


40D 


A, 100 


CMP 


L 


JC 


:30 



check left hand nargin 



5a = rior iZ3Tta I screan oosition 

;wiTdow size* 2 ("iO) 

;iiove screen wnen cjrso- aoout to go off 
Sthe right hand nargin 



E818 


D65A 


E31A 


30 


E8ia 


38 


E81C 


7D 


E81D 


0604 


E81F 


C8 


E820 


1303 *E825t 


E822 


70 


E823 


0664 


E825 


IF 


E826 


C620 


E823 


2143ES 


E823 


77 


t82C 


3AS2EF 


E82F 


E61F 


E331 


:620 


E833 


2B 


'334 


77 


E835 


2B 


E836 


23 


E837 


0604 


E839 


C5 


E33A 


E5 



:30: 



SCRL: 



J5D: 



SUB 


90 


CMP 


L 


RC 




MOV 


A,L 


SU3 


10 


i^Z 




JS 


SCRL 


XOV 


A.L 


SUS 


100 


RAR 




ad:; 


4,' ■ 


LK 


HL»ESCSQt3 


STO 


A.tHL] 


LD 


A.PIABD 


AfJD 


IFh 


AOO 


A,' ' 


DEC 


HL 


STD 


A, tHL3 


DEC 


HL 


DEC 


HL 


LK 


9,4 


PUSH 


BC 


PUSH 


HL 



SchecK I eft nargi n 
;cursor in wiido.* return 



•return if cjsor at colurn 2 



;escsq«-2 = vert, coords 
Jpoiht to start of esc seq 



o 



o 

o 

3 
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3.5E <:/55/7= 



E83B 


4E 


LD 


C.tHL] 


EBBC 


CD60E8 


CALL 


CRTIO 


ES3F 


El 


PuP 


HL 


ES*0 


CI 


POP 


3C 


E841 


Z3 


INC 


HL 


E842 


10F5 "ESSgi 


OJNZ 


550 


E84* 


C9 


SET 




E845 


18 ESCS3: D8 


ESC 


E8*6 


53 


03 


•S" 


E8*7 


00 


OB 





ES^iS 


00 


03 






=9:92 Page 39 
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!s3t s:r33T ;03r3 escape ssqusjiue 

;** y ooord 
;** X coord 



o 

o 



o 

o 

3 



O 

o 
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£849 CRST«T: 



Returns statjs of irt. 
crt is always ready 



E849 proc 

E349 FSFF OR I OFFh 

E845 i;9 ^ET 



£840 




CRTOJTS 










' 




ENTRy 


C = OUtDUt 




= 0308 


EF. 


.esc: 


= 


8 




= 0031 


EF. 


.5?! 


= 


1 


Ea4C 








proc 




E84C 


3A60EF 






LO 


A.ESCH 


E84F 


E609 






AND 


EF_eSC*EF_GR 


E851 


2000 "ESbOt 






JRN2 


CRTIO 


E853 


79 






HOV 


A.C 


EB54 


FE14 






CPI 


14h 


E856 


2008 *E850S 






JRNZ 


CRT13 


£858 


3A58E1 






LO 


A.AHSENB 


E85B 


2F 






CMA 




E85C 


3268E1 






STO 


A.AHSENS 


E85F 


C9 






RET 




E860 




:rtio: 






E860 


lEOC 






LDK 


E.OCh 


E862 


C317E3 






JMP 


ROMCDI 



;escape flag bit dafinitions 



ioutout to crt 



o 

o 
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E8f>5 



SGST4T! 



;sts status of output device attachsd to sarial oort 



E365 

E865 IE20 

E867 1847 *Ea'?0$ 



or DC 
JR 



E,2Dh 
J>1PR3« 



iCal 1 roTi dr i vsr 



o 

o 

3 

T3 



£869 



SIST4T; 



Sets status of i iput device attasnec! to serial oort 



c869 

E8b9 CD33E8 

E35C E601 

E36E :8 

E86F F6FF 

E871 C9 



proc 

CALL 

ANI 

RZ 

OR! 

RET 



AC I STAT 

si.R^oy 



TRUE 



Jreturn xith not ready status 



E372 



SPIN': 



Inputs a character froti the serial oort 



E872 

E872 ltl5 

E874 183A 



*ES30$ 



proc 

LDK E,15h 

JR JMPROM 



E876 



5PDUT: 



Dutouts character in reg c to tie serial oort (list device) 



E876 

E876 lEOF 

E878 1836 »E3iO$ 



proc 

LDK EfOFi 

JR JMPROM 



Osborna :P/M 2.E 



SO'Cl^l 3D8x Ssseiibler *er 
;5IDS lev 1.* 



3.5E <:/5in^ 



=9:92 Pa33 *2 
CiOCCBI'JSS.iSM 



E3TA 




P^TGJT: 










? 


routine 


does LIS! 




= DOll 


XQN: 


= 


llh 




= 0013 


XOFF: 


= 


13h 




= 3003 


ETXt 


= 


3 




- 3006 


AC<: 


= 


6 


E87A 






proc 




E87A 


CD76E8 




CALL 


SPOUT 


E870 


3A67E1 




LD 


A.PRNTER 


E880 


87 




3RA 


A 


EB31 


C8 




R2 




E882 


£602 




ANI 


2 


E8S'» 


2013 *E399t 




JRNZ 


XONXOF 


E885 


3ED0 




LCH 


AtOori 


E838 


39 




CMP 


c 


EB89 


CO 




^NZ 




E88A 


OE03 




LDX 


C.ETX 


E88C 


C075E8 




CALL 


SPOUT 


E88F 




PRTIO: 






ESBF 


C072E3 




CALL 


SPIN? 


E392 


E57F 




ANI 


7Fh 


£394 


FE05 




CPI 


ACK 


E896 


20F7 "EBBFS 




JRNZ 


PRT13 


E893 


C9 




i^ET 




E899 




XOSXDF: 






£399 


CDS9E8 




CALL 


SISTAT 


E89C 


37 




3RA 


A 


E89D 


C8 




RZ 




E39E 


CD72E8 




CALL 


SPIN' 


E3A1 


E67F 




ANI 


7Fh 


E8A3 


FE13 




CPI 


XCFF 


E8AS 


CO 




RNZ 




E8A6 




PRT20: 






E8A6 


C072E8 




CALL 


SPIN' 


E8A9 


E57F 




ANI 


7Fh 


E8A8 


FEll 




CPI 


XON 


E8AD 


20F7 *E8A6t 




J^NZ 


PRT23 


E3AF 


C9 




RET 





jutDut and prntsr protoiols 



Jmask out oar i ty ait 



:mask out Dar i ty bit 



;inasK out aarity oit 



o 

o 
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E830 C31733 



J«PR1M: JMP 



ROMCDl 



;i3C aCICTL: = S9iU0 

! Outputs character in 



to the ACIA CTL . DDrt. 



O 
o 



P3S3 



E393 

5833 1E31 

E835 13F9 »:830t 



4CISTAT: 



Returns usart status in A 



PRDC 

LDK 

JR 



E.81H 
JKPRQW 



;Low ordsr oyts of AZISTir rojtine in ^Qn 



? 



SO^CIM 30?x Asssmbter Kar 3.SE <:l^^n- 
Dsborns :f/M 2.2 C3IDS Rav l.'t 



=9:92 P533 ** 

C:Ot;:31D35.1S"l 



E8B7 



5EIH5TAT: 



Returns status of IEEE input port 

EXIT A = character not availabia 
A = 'FH character availasia 



O 
o 

3 



£857 

E8S7 1ES7 

E359 18F5 "ESSOS 



pr 00 




LOK 


E.87H 


JR 


J M PR OH 



E3B3 



IE3STftT: 



Returns status of IEEE output oort 



EXIT 



3 transmitter not ready 
FFH transnitter ready 



E8BB 

E8B3 1E3A 

E8B0 13FI *E330S 



pr 00 

LDK 

JR 



E.3AH 

J « PR DM 



E8BF 



IE!N=: 



^eads a character from IEEE port 



E8BF 1E8D 

t8Cl 13ED "E830S 



JR 



E.8DH 
JMPRQx 



E8C3 



IE3UT: 



3utputs the character in reg C to 1= 



!ort 



EaC3 

E8C3 1E90 

E8C5 18E9 "•E830S 



or oc 

LDK E,9r)H 

JR JMPRD« 



o 

o 



o 

o 

3 



, , SO^CIH SOSx 4ss9Tib!er var 3.5S <:/55/7= =9:92 ? = -= 4=; 

asborne Z?fH 2.2 C3ns Rev 1.4 C: OCC.JdIL »SH 

53C7 »03T4T: 



jKLi status of the parallel (centrDnix) orintar 
attachsrj to tna ieae port 



E3C7 

E8C7 lE9a 

E8C9 13E5 »E330$ 



E8C3 'IST4T: 



proc 




LDK 


E.96H 


JR 


J K PROM 



E3CB 

^3CB 1E93 LDK ?,93H 

tSCD 18E1 "ESSOS JR JHpi?0«1 



Sets status of tie input device atta:h3d to the 
naral 1 al oor t 

proc 



E8CF PA^IMPs 



Inputs a character froTi parallel port 



E8CF 

E8CF 1E99 

E301 ISDD "ESJOS 



E803 PAYOUT: 



proc 




LD.< 


Et99H 


JR 


JHPROM 



Cutouts the character in c to the IEEE port treating the 
port as a parallel port. 



E8D3 prpc 

ESD3 1E9C LCI< E,9CH 

E8D5 18D9 *E8B0$ JR JMPRO« 
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=. E8D7 SW2R:M: 



M 


E8D7 




% 


E8D7 


F3 


cr 
o 


E8D8 


F5 


3 


£809 


*F 


o 


ESDA 


3300 




E30C 


3208EF 


■D 

C 

5 


E8DF 


Fl 


E3E0 


F3 


o 


E8E1 


C9 


■3 







E8E2 SW2R4H: 



E3E2 




E8E2 


F3 


EaE3 


F5 


E3E4 


3E01 


E8E6 


D3 01 


tSES 


3208EF 


E8EB 


Fl 


E8EC 


F3 


E8E0 


C9 



Switohas to ron 
saves al I regi stars 



PRQC 




DI 




PUSH 


AF 


XRA 


A 


OUT 





STO 


A.ROMSAH 


POP 


AF 


El 




*ET 





Switchss to ran 
oreserves all registers 



PRDC 




01 




PUSH 


AF 


LDK 


A.l 


OUT 


1 


STa 


AtRO-^RAM 


POP 


AF 


EI 




RET 





o 

o 

3 
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Dsborne CP/H 2.2 C3I0S Rev 1.4 C: 0:C? Am5. &S1 

= E3EE XXX: = * 

= OOOQ IF XXX > CC' ■*■ icOGH 

.9 ERRQS SYSTEM SIZE TOO LARGE 

ENDIF 

«SG 'SYSTEM SP4CE 4VAILA8LE = '.lEDOH - < XXX - CC?) 

•SYSTEJ1 SP4CE 4VSILA3LE = 0012' 



ESEE = E900 ORG CCP ♦ lEOOH 

Jused by occ3io4?« # drios 



E900 


= 


0004 


LASTA! 


DS 


4 


E904 


= 


00D2 


DPBS 


OS 


2 


E905 


= 


0002 


SAVD'H: 


DS 


2 


E908 


= 


0001 


TEMOSK: 


DS 


1 


E909 


= 


0001 


TEMTYP: 


DS 


1 


E904 


= 


0002 


SAVADR: 


OS 


2 


E90C 


= 


0030 


ALV: 


DS 


ALVSZ 


E93C 


= 


0020 


CSi/J 


DS 


CSVS2 


E95C 


- 


0001 


SEHTYP: 


DS 


1 


E95D 


= 


0001 


HSTTYP: 


DS 


1 


E95E 


= 


0002 


XLTKEY: 


DS 


2 



= E960 


YYY: 


* 


= 0000 


IF 


YYY > MRAH 




.9 ER^OR 


CODE HIT a>1RAM 




ENOIF 






;0CCilAM2.ASH 





EFOO 


= 


0006 




= 


EFOl 




~ 


EFD2 




= 


EFD4 




= 


EF05 


EF06 


= 


0001 


EF07 


= 


0001 


EF08 


= 


3031 


EF09 


= 


0306 


EF3F 


_ 


0002 


EFll 


= 


0032 



EFl* 


= 


3331 


EF15 


- 


0002 


EF17 


= 


3001 




- 


EF14 




= 


EF15 




= 


EF17 


EF13 


= 


0001 


EFig 


= 


0032 


EFIB 


= 


0001 


EFIC 


- 


3001 


EFID 


= 


0002 


EFIF 


- 


0001 


EF20 


- 


3001 


EF21 


- 


0001 


cF22 


I 


03 01 


EF23 


= 


0031 



6 




TEM+l 


;rand3ii number se5d 


RNDV+1 


;du ercnt 


ERCNT+2 


;retry count 


STRC+1 




1 


Sproupt character 


1 


;=0t ) ist ehco off 


1 


;0= RAM. ■ 1= *0H 


6 


;Disk status bytes 



SORCIM e08x issembrer »rer 3.5E <:/55/7= =9:92 Page *3 
Jionitor ^&H Storage. C: OCCIA125. HS^ 

; Jsed to assembly RDM resident and :bI3S 

E960 = EA80 ORG MR4M 

; Host disk xfer ojffer and... 

; Format track tsmalate holding buffer 
EABO HSTBJF: 

EA80 = 04S0 OS 1024H28 

: Directory 3jffer 

= EE80 DIR8UF: = HST3 JF*-132<t 

TEM OS 

ERCNT 
RTRC 
RTRY 

HPCH^ DS 

ECHO? DS 

^Qi^RAH DS 

DSTS3 DS 

; Disk operatiDn tsirps and control 

DMADR DS 2 ;Address for read/.<rite Disk 

DHAAOfi DS 2 ;C9I0S. users DHA 

: Note order of xxxSEC.xxxTR^t xxxDS< inust be mai rit ai ned 

: along with lengtl tl»2tl). 

EF13 = 3001 SE<DEL: OS 1 ;S3t for 3ee<-restore ^onsnand in ^ 3H 

Saepends on disk type. Sie-ne-is = 3h» Mi>I = Oh 

SAVSEC DS 1 ;last sector reqjestad 

SAVHK DS 2 :l3st track requested 

SOIS<; DS 1 :Selected disk drive (0.1) 

;S&VTYP = OEFDOH :SeLECTEO type (sectDr size) 

ACTSEC = SAVSEC 

ACTTRK. = SAVTRK 

ACTDSK = SDIS< 

SE<SEC DS 1 

SEKT^K DS 2 

SE<DSK DS 1 

HSTSEC DS 1 

HSTTRK DS 2 

HSTDSK OS 1 

TEMSEC DS 1 ;U3ed in bios only 

^OFLAG DS 1 :Read flag 

ERFLAG DS 1 ;Error reporting 

WRTYPE DS 1 ;write ooeration type 

lALV: DS ALVS 

;CSV: OS CSVS 

EF24 = OOOC DS ALVS 

EF30 = 0020 DS CSVS 



BIOS blocking-deblocking flags 



o 



EF57 


= 


0032 


EF59 


= 


0001 


EF54 


= 


0032 


EF5C 


_ 


0001 


EF50 


= 


0001 


FF5E 


= 


0001 


EF5F 


= 


0301 


EF60 


= 


0C31 



HSTACT: 


DS 


HSTWRT: 


OS 


uNbCNT; 


OS 


J^AT^K: 


DS 


UN4SEC: 


DS 


L03SEC: 


DS 


LD4D? 


DS 


iCErLIX 


DS 


CU?S 


DS 


• 


Ke' 


TKEY 


DS 


4KCNT 


DS 


LKEY 


DS 


CKEY 


DS 


ESCH 


OS 



SO^CIH 80Bx issembler \isr 3.5E <:/55/7= =9:92 Piga ^9 
Monitor RA1 Storags, C :n:C ?A125. 4SH 

EF50 = 0031 HSTACT: DS 1 ;h3St active flag 

EF51 = 0301 HSTWRT: DS 1 ;Host written flag 

1 iUnaiioc rec count 

EFS3 = 0002 J^AT^K: OS 2 ;Track 

EF55 = 0331 UN4SEC: DS 1 ;S3ctor 

FF56 = 0001 L03SEC: DS 1 ;L03ical sector 

2 

1 ;Z9ro if locked keyboard 

2 Jcjrrsnt cursor positisn 

Keyboard scsn tenporaries 

1 JTsm ho I di ng key 
o EF5D = 0001 4KCNT DS 1 ;Debounc8 key 

1 SLast valid keystroK3 
1 "Last control key 
1 ;eSC holdi ng f lag 

Sdspendency in VC.HOME of JMKEY.asm 
EF61 = 3001 PIAAO: DS 1 :Hotds last PIA-4 data 
EFS2 = 0001 PIABD: DS 1 JHoMs last PIA-3 data 

; Calendar montht day year 

EF63 = 0003 ID4Y DS 3 

= EFS4 IM3NTH = IDAY+l 

= EFb5 lY^ = ID4Y4-2 

; Wall clock tine cells and disk active 

; see UPTIM: in 3H<EY.asm 

EF56 = 0306 HOURS: OS 6 

= EF67 HIMS: = HOURS+l 

= EF58 SECS: = HOURS+2 

= EF69 5E:5: = HOURS+3 

5 Used to deselect drive when there is NO activity 
« on drive for n seconds. See FDSK rojtine 
HOURS+* :=3 by FDSK, Used by UPTIH 

HOURS+5 ;*3 bel i timer cell 

1 Jiiax iKcolumns in a logical line 
•LLIMIT = ' ,LLIMIT,«h.' 

Disk drive current positions 

2 JLast selected drive 
LDSEL+1 ;Last track used for non-selected drii/e 

2 Ssave current stt otr 

; Interrupt stack 

DS 20*2 
ISTK: DS 

? Stack entry 

OS 20*2 
3I3STIC: 





= 


EF5A 


DACTtfE: 


= 




= 


EF5a 


3ELCNT: 


= 


EF6C 


= 


30D1 


LLIMIT 

: 

• 


DS 
HSG 

DisI 


EFSO 


= 


3302 


LDSEL: 


OS 




= 


EF5E 


LDTR< 


= 


EF6F 


= 


0032 


IEST<: 


DS 



EF71 


= 0028 


EF99 


= 0000 


EF99 


= 002 8 


EFCl 





EFCl 


= 00 DO 


*Q«STK: 


OS 





EFCl 


= 0001 


ACI A3: 


DS 


1 


EFC2 


= 0OD4 


»179x: 


DS 


* 


EFC5 


= 0001 


<B3Lf: 


DS 


1 



SO^CIM 808x issemblsr <er 3.5E <:/5?/7= =9:92 Paga 53 
Monitor !IAM Starags. C:OCC^Ai125- 4SH 



;last command byte written to ACtA 

;l79x register savs ar3a 
Skeyboard debounce-da I ay call 

9 

§■ :3in:e CP/M CA'^NOT boot off 3:» this cell is used 

3 ;to invert the nanes of ths 2 drives: 

° ; =0, all normal. 4=A:. a=B: 

; =1, all inverted. A=8:. B=A: 

1 EFC7 = 0001 DS^Si^P OS 1 
c 

* EFC8 ALIGN lOh 

g EFC8 ♦= 3003 OS ( *+t lOH) -1 ) /< lOH )* ( lOH)-* 

■B 

S = EFCC SEQ: = *"* 

5- EFDO ACTTyP: 

= EFDO = 0031 SAVTfP: 3S 1 

EFDl = 0001 ^DT.WmS: DS 1 

EFD2 = 0002 CCPA3R: DS 2 

EFD* = 0036 tEYLST: OS 6 

EFDA = 0001 SERFLG: DS 1 

EFOB = 0001 lE.AOR: DS 1 

EFDC = 0001 IE.CHAR: DS 1 

EFDO = 0001 PIACTL: OS 1 

EFDE = 0031 PP.M3DE: DS 1 



; 8080 Register Save Area. 
ALIGfJ lOh 

as t*+llOH)-l)/!10H>*tl3H)-* 

REGS: 

ES&VE: DS 1 5E Register save locitioT 

3SAVE: DS 1 SO Register save location 

tSAVE: OS 1 !C Register save location 

aSAVE: OS 1 !B Register save location 

FSAVE: DS 1 ;FLAGS save location 

AS4VE: DS 1 ;& Register save location 

LS4VE: DS 1 IL Register save location 

^S4VE: DS 1 !H Register save location 

PSAVE: OS 2 ;PGM COUMTER 3av= location 

SSAVE: 3S 2 ;useR STACK oointer save location 

9KPA! DS 2 Jlast breakpoint address 

BK'C: DS 1 iContents of bko 

EFEF = 0001 VRTOFF OS 1 JLAST VERTICAL OFFSET TA<EM i^ROM COUT 

Interrupt Juno Vector is between EFF3. EFFF. 

; Endx MRAM 



ERRORS. 523 Labels, 57:;?h bytes not used. Prograii LW& = FFFOn. 



EFOF 






EFOF 


+ = 


0001 


EFEO 






EFEO 


= 


3301 


EFEl 


~ 


0301 


EFE2 


~ 


0001 


FFE3 


= 


0031 


EFE4 


= 


0331 


EFE5 


= 


0031 


EFE6 


= 


0001 


EFE7 


= 


0001 


EFE3 


= 


0032 


EFEA 


= 


0032 


EFEC 


- 


0002 


EFEE 


= 


0031 



SO^CIM 303x Assamblsr wer 3.56 <:/55/7= =9:92 ?33=> 51 

^ Dsborne :P/t« 2.2 C3I3S Rev 1.4 C:o:c?A«25.4S i 

5 s SFREQ 3F10 

£■ n ACIAO cFCl 50* 3 

^ ACICTL F13C t't9 ' ''S "* 

® ACIST4 E833 4/50 41/16 43«13 

g ACK 0006 4?# 8 42/27 

P? ACMD E19C 5#49 22/20 

I 4CT0S< EF17 27/ 7 28/12 48«39 

q a:tsec efi4 27/13 28/16 29/17 43*37 

3 ACTTRK EF15 27/10 23/14 48S33 

ACTTY? EFOO 27/16 28/13 50#13 

1 AHSCRL E7F6 37/12 38« 2 

■a AHSENB E168 5#18 38/ 6 40/25 40/23 

S s ALIGN Tiac 53/15 50/35 

ALV E9DC 7/12 7/24 47S23 
q s ALVS 003C 48/57 

1 ALVSZ 3030 3#13 7/12 7/15 7#15 7/24 7/27 7#27 
S 47/23 

o n ASAVE E1=E5 50#42 

^ n SASVLD 0080 37» 8 

3CC? E521 ■" '4*^ -?i«ci 

n 8!;PH E519 21#51 

BOOS D306 2« 4 22/15 

n BELCMT SF53 49#41 

BIOS 5100 2# 3 2/7 4/9 S/20 22/13 

310STH EFCl 11/31 49#60 

n 3HP4 EFEC 50#4a 

n B<PC EFEE 50*49 

S^ATE E169 5«20 21/31 

n BSAt/E EFE3 53S40 

CAUTO E190 5*53 5/55 22/13 

CAUTQL 3037 5/53 5*55 

CSOOT E4E0 4/11 21S23 

CCP :330 2# 2 2/3 2/4 21/24 21/48 22/23 22/54 

47/ 3 47/ 3 47/13 

n CCPADS EF02 50*21 

s CDISH 0004 14/17 14/20 21/42 22/56 

CrtKSEL E3FA 13/29 15# 2 

CHKSEQ E4D8 15/13 15»22 

n CUE/ EF5F 49#17 

CNSI E7A1 35/ 5 35« 2 

CMST5 E7AC 36/19 36#27 

CNT^LO E145 5/26 5*56 

CMTILI E1A6 5/27 6# 2 

CNT^L2 E1A7 5/23 6# 3 

CNTRL3 E1A3 5/29 5# 4 

CNT!?L4 E1A9 5/30 6# 5 

CNT?L5 SIAA 5/31 6* 6 

C,1TRL6 ElAB 5/32 6« 7 

CNT?L7 ElAC 5/33 6# 3 

CMT^LS ElAD 5/34 6# 9 

CNT^L9 ElAE 5/35 6#10 

CDNIN E733 4/14 32#16 

C3N3Ur E738 4/15 31/ 5 32«(25 

CONST E72E 4/13 32# 6 

COU»JT E7C1 36/17 37/13 37#20 37/50 

S C^ 0000 14/24 14/29 22/39 22/42 22/42 

CSSTAT E849 35/25 40# 2 

C^TIO E8S0 39/ 2 40/22 43/25 40*31 

CUTOUT E34C 35/19 35/31 40*13 

n CSAVE EFE2 50#39 



o 

o 



SO^CI?^ 808x assembler i^er 
Dsborne Z?/K 2.2 CBI3S Rav !•* 



3.5E <:/55/7= 



=9:92 Page 5Z 
C:0::C^A'<25-5,SH 



CSV E93C 
CSVS 002O 
CSVSZ 0020 



CUN&CT 
CURS 
DIDSH 
n D4CTVE 

D3XLTS 
DEC 

DECOSH 
DECXLT 
OENER^ 
DENL 
DIR9UF 
n 0IR3M 
3ISPCH 
DMA 

ailAiVOR 
3>^A!>R 
ODNE 
DDNf 
OONEl 
DOWM 
D?3 
Dt>3&SE 

1 OPBOEC 

OPBGEN 
n 3>3I8>1 
n DPSSl 

D?BST4 
n D»BXO 
n OPBXT^ 

0>H3ES 

OIV 

ORVl 
n DSAVE 

DSKDl 

DSKSl 
n OSICSW? 

05p:hi 

n DSTSB 
n E^HSP 

E^ESC 
EF5^ 
n E^^R3t^ 
E0T3L 
E^CMT 
iSlFLAS 
n ESAVe 

s ESC 
ESC^ 
ESCSQ 
ETX 

s FALSE 

S FCB 
FILL 
FILL2 



E*c;9 

EF5A 
0039 
EFSA 
0080 
OODO 

oooa 

OOAS 
E252 
E3S2 
3025 

EE30 

3031 

E768 

3033 

EFll 

EF3F 

E59A 

E5A5 

E5A3 

ElBl 

E934 

E230 

E29e 

E2DE 

Tia; 

;2CE 

E2AE 

E29E 

E2SE 

E2EE 

Tia: 

E337 

E3F9 

EFEl 

003C 

3035 

EFCT 

E753 

5F09 

EF37 

0038 

3031 

0030 

E1J3 

EF32 

EF22 

EFEO 

3313 

EF50 

E8*5 

3333 

3330 

305C 

t65A 



7/11 

4B/58 

3«14 

47/24 

19#Z2 

33/10 

2#28 

49#39 

21/60 

7/ 7 

2#25 

2#31 

5/ 8 

14/ 7 

14/23 

7/ 9 

2#45 

32/39 

19/54 

22/ 3 

22/22 

22/47 

22/34 

5/38 

lb/40 

7« 4 

7/10 

9«42 

3«4S 

9#33 

9#15 

9# 4 

9i»24 

9#51 

3*17 

14/11 

14/12 

50#3S 

ZttZZ 

2*21 

53*12 

3 4#13 

43S22 

45S2D 

43«1S 

43#17 

2#44 

5/40 

48«16 

23/13 

53#37 

39/ 9 

22/ 7 

3S/4S 

42# 7 



23/13 

2&#26 



7/23 

7/11 

20/12 

49#11 

7/15 



7/19 
9/44 
9/47 
8»28 
14#23 
14#26 
7/21 

33/19 

26/37 
43S25 
22/26 
22(152 
22*54 

6«13 
16/50 
13/24 

7/22 

9/ a 



7/ 6 
14#25 
14#30 

9/ 3 
9/17 

3 4/12 



40/21 

40/21 

6«15 
48/17 
25/14 



40/20 
39* 9 
42/21 



25/ 6 
26/34 



47*24 



7/14 



7/27 



8/ 4 



14/25 



48#11 



33/33 



48*26 



22«45 



47S15 

24/40 

9* 5 

9/17 



15/27 



7/13 



25/21 



49#13 



7»14 



9/11 



3#11 



7/23 



7/26 



7«26 



33/41 



34# 2 



9/26 



9/35 



9/44 



29/24 



29/27 



33/ 6 



43#51 



26l» 



3.5E <:f5Sn- =9:'52 P333 53 



O 
o 



O 
o 



Ssborna :?/M 2.2 


C3nS Rev 


1.4 






FILL3 E65F 


25/23 


26»31 






FILL35 E665 


2b/2« 


25#36 






FILL'V S633 


7 6#55 


25/60 






FILLS S691 


26/50 


26/57 


27i» 3 




FILL6 E694 


25/46 


27# 5 






FINAL E6E3 


27/22 


29if 2 






FLUSH E5C1 


12/ 8 


25/20 


27/ 3 


23i« 2 


n F-ITJ E139 


't«32 








FDRER^ E333 


1*/ 4 


14#23 


14/31 




FD^L D021 


l*/23 


14*31 






Ff>YDIB D038 


2«15 


2/23 


2/29 


2/30 2/31 


FPYSI3 0010 


2*14 


2/27 






n FSAtfE FFE4 


SOtfil 








s FWAtfM FQ30 










GOEM E431 


15/41 


ISf 2 






GET3EM E490 


15/13 


134 2 






GDDIS? S73S 


32/11 


32/21 


32#35 




G3R0M E33a 


11/35 


11«50 






G^ET E^ZC 


15/34 


15/39 


15*44 




s H.IEEE 2900 










s H.SIO 2ftOQ 










n HKCMT EF50 


49#15 








HOME E33F 


4/19 


12« 2 


21/49 




H^U^S EF56 


49#32 


49/33 


49/34 


49/35 49/39 49/41 


n HSA>^E EFE7 


50S44 








HSTACr EF50 


12/10 


2 3/23 


2 6/42 


43«61 


HST3UF E4S0 


22/ 2 


26/21 


43# 7 


43/11 


HST3SK EFIF 


27/ 6 


2 8/11 


48#47 




-ISTS5C EFIC 


26/51 


27/12 


23/15 


43«45 


n HSTSIZ 04D0 


2#13 








H5TTRS EFIO 


27/ 9 


23/13 


4SS46 




HSTTY? E950 


2 6/47 


27/15 


23/17 


47*27 


HSTWRT EF51 


25/13 


23/ 6 


49# 2 




I3M 0038 


2#24 


9/35 






I9MDS1 009C 


2«30 


9/38 






I3HXLT 0030 


3/ 7 


8i26 






lOAY EFS3 


49#25 


49/27 


49/28 




lEAOR EF3B 


21/39 


50«25 






n lESlC E13F 


4#35 








n IE32C El<f2 


4#37 








n IE33C ElifS 


4#33 








n IEB*C El*8 


4»«39 








n Ir35C El*3 


4#40 








n IE3&C El^E 


4#41 








n IE87C E151 


4#42 








n IE3BC E154 


4#43 








n IEC^A^ EF3C 


53S26 








lEEEAD E1S9 


5#42 


21/33 






lEINP ES3F 


35/15 


44S23 






lEI'JST E8B7 


35/ 8 


44S 2 






IE0ST4 E333 


35/28 


44#15 






lEOUT E8C3 


35/22 


35/34 


4 4«37 




lESTK EFbF 


13/14 


49»51 






n I^DNTH EF5* 


49»27 








IDBITE E1S6 


5«11 


21/23 






s I33YTE 3003 


21/29 


3 4/3 






n IST< EF99 


49«56 








n irR EFS5 


49#23 








J*(P^O« E330 


41/ 7 


41/30 


41/40 


43* 2 43/13 44/10 




44/32 


44/42 


45/ 3 


45/19 45/29 45/40 



44/23 



o 

o 



SO^CIH 3D3x Assemoler ^er 3.5E <:/5577= -9:9? "ij" •ji, 

D3Dorn= Z?/H 2.2 C3I1S R =« 1.4- C: OCC^AIJS. »S »1 



n KBOLY 


EFCS 


50» 6 






KEYINF 


' ETAF 


35/12 


37» 2 




n KEYLCK EF59 


't9#10 






n K5YLS1 


■ EFD4 


5DS22 






KIMD 


E731 


37?1H2 


37/51 




KINIO 


E7:6 


37/li 


37#27 




K?ET 


E7C3 


37S24 


37/35 


37/37 


L4STA 


E9 00 


15/15 


47S15 




n LDADR 


EF57 


*9# 9 






LDSEL 


EFSD 


49*<fe 


49/49 




n L5T5.K 


EF6E 


^►9**9 






LEFT 


E132 


5/39 


5«14 




s LF 


DODA 


14/24 


14/29 


22/39 


LIST 


E73F 


4/15> 


31/14 


32*40 


LISTl 


E74E 


33/ 8 


33<«17 




LISTST 


E7S3 


4/25 


33*46 




LKEY 


EF5E 


35/23 


49#16 




.LI«IT 


EFbC 


21/36 


49'*44 




ldgse: 


E = 55 


20/14 


2 4/30 


49* 6 


n LSA*?E 


EFES 


50#43 






3 LVHE-I 


1D30 








s n*A>teii 


FF = F 


2/ 9 






n MINS 


EFb7 


49#33 






n MPC^R 


EFD6 


48S19 






S H^A^I 


i480 


47/37 


48/ 3 




MSIJE 


0033 


1#50 


22/40 


22/40 


M1/IVF3 


E7D6 


23/10 


24/16 


30* 2 


N3SK 


3002 


3#11 


7/ 6 


7S 6 


NEXT 


E723 


31/45 


31#49 




next: 


E710 


31#37 


31/53 




NDF30 


0002 


3«il2 


7/13 


7*13 


NJM3P3 


0006 


9#56 


16/26 




5 NVOL 


0018 








PARIN? 


es:f 


35/14 


45S24 




P4S3UT 


E3D3 


35/21 


35/33 


45*34 


PIAAD 


EFbl 


33/13 


38/27 


49*22 


PIA3D 


EFb2 


38/50 


49#23 




n PIACTL 


EFOO 


50#2S 






n PINIT 


513B 


5*46 






PINTFS 


E19A 


5#44 


33/ 5 




pistat 


E8C3 
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